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VERSION  IDENTIFICATION 

"^This  document  describes  the  Ada  Compiler  Validation  Capability 
(ACVC),  Version  1.10.  This  version  consists  of  3719  tests  in  4182  test 
files.  Also,  there  are  three  units  in  four  files  and  three  tests  in  three 
files  which  support  the  running  of  the  ACVC  tests;  one  data  file 
containing  macro  definitions;  one  program  in  one  file  for  making  the  macro 
substitutions;  and  five  programs  in  165  files  which  are  used  to  aid  in  the 
validation  process.  The  differences  between  Version  1.9  and  1.10  are 
detailed  in  sections  2.0  through  4.0.  > 


2  TEST  MODIFICATIONS 

In  Version  1.10  of  the  ACVC,  383  tests  were  modified  from  the 
corresponding  tests  in  Version  1.9.  Modifications  have  been  made: 

a)  to  correct  testa  that  were  found  to  be  incorrect  in  previous 
versions  of  the  ACVC,* 

b)  to  strengthen  the  testa  by  making  the  tests  more  comprehensive 
or  by  incorporating  more  cases  to  check,’  and 

c)  to  bring  teat  code  into  conformance  with  the  coding  standards.  - 

/ 

/ 

The  following  tests  have  been  modified  from  Version  1.9: 


A28004A.ADA 

AE3101A.ADA 

B24204B.ADA 

B28001S.ADA 

A35902C.ADA 

B22003A.ADA 

B24204C.ADA 

B28001T.ADA 

A74 106c. ADA 
B23003F.TST 
B28001J.ADA 
B28003A.ADA 

ADI  A0 1  A.  ADA 
B24204A.ADA 
B28001R.ADA 
B2A003A.ADA 

AccesK'.i 

B2A003B.ADA 

B2 AO 03c. AD A 

B33301A.ADA 

B36001A.ADA 

NTIS  Cl 

B37201A.ADA 

B37312B.ADA 

B39004G.ADA 

B39004J.ADA 

DTIC;  T, 

B39004L.ADA 

B44001-AiADA 

B49006A.ADA 

B49009A.ADA 

Uriar.no'! 

B59001A.ADA 

B64001A.ADA 

B67001A.ADA 

B67001B.ADA 

if  OJ’ 

B67001C.ADA 

B67001D.ADA 

B85013C.ADA 

B86001B.ADA 

B91001H.ADA 

B91003B.ADA 

B95001A.ADA 

B97101A.ADA 

ov/\7r ' 

Di.,;  I-..  }, 

B97101E.ADA 

B97 102c. ADA 

B97102E.ADA 

BC3105A.ADA 

BC3604A.ADA 

C32001B.ADA 

C32111 A.ADA 

C32112A.ADA 

C32n2B.ADA 

C321 13A.ADA 

C321 15A.ADA 

C34004A.ADA 

C34007A.ADA 

C34007D.ADA 

C34007G.ADA 

C34007M.ADA 

- - - 

C34007P.ADA 

C34007S.ADA 

C34012A.ADA 

C35102A.ADA 

C35502F.TST 

C35502K.ADA 

C35502N.DEP 

C35502P.ADA 

1 

C35503C.ADA 

C35503D.TST 

C35503E.ADA 

C35503F.TST 

t 

1 

C35503G.ADA 

C35503H.ADA 

C35503K.ADA 

C35503L.ADA 

C355030.ADA 

C35503P. ADA 

C35505C.ADA 

C35507C.ADA  1 

C35507E.ADA 

C35507G.ADA 

C35507H.ADA 

C35507I.DEP 

C35507J.DEP 
C35508E.ADA 
C35508O.ADA 
C35802Y.DEP 
C35A06N.ADA 
C37206A.ADA 
C37213J.ADA 
C37215H.ADA 
C41 308c. ADA 
C42007G.ADA 
C45332A.ADA 
C45532N.DEP 
C45621I.DEP 
C45621M.DEP 
C45621Q.DEP 
C45621U.DEP 
C45621Y.DEP 
C47008A.ADA 
C52104L.ADA 
C64103F.ADA 
C64104J.ADA 
C64109I.ADA 
C85018B.ADA 
C94002G.ADA 
CC1221A.ADA 
CE2102A.ADA 
CE2102E.ADA 
CE2 1021. ADA 
CE2103B.TST 
CE2104D.ADA 
CE2106B.ADA 
CE2107D.ADA 
CE2107H.ADA 
CE2108C.ADA 
CE2 109c. ADA 
CE2111A.ADA 
CE2111E.ADA 
CE2115B.ADA 
CE2201F.ADA 
CE2208B.ADA 
CE2401E.ADA 
CE2404A.ADA 
CE2408A.ADA 
CE3002B.TST 
CE3103A.ADA 
CE3108B.ADA 
CE3111B.ADA 
CE3112A.ADA 
CE31 15A.ADA 


C35507K.ADA 
C35508G.ADA 
C35508P.ADA 
C35802Z.DEP 
C36204B.ADA 
C37207A.ADA 
C37215C.ADA 
C38102C.ADA 
C41320A.ADA 
C45242B.ADA 
C45532B.DEP 
C45614C.DEP 
C45621J.DEP 
C45621N.DEP 
C45621R.DEP 
C45621V.DEP 
C45621Z.DEP 
C47009A.ADA 
C54A24B.ADA 
C64104A.ADA 
C64104K.ADA 
C64109J.ADA 
C87B04B.ADA 
C96001A.ADA 
CCI3IIA.ADA 
CE2102B.ADA 
CE2102F.ADA 
CE2102J.ADA 
CE2104A.ADA 
CE2105A.ADA 
CE2107A. ADA 
CE2107E.ADA 
CE2107I.ADA 
CE2108D.ADA 
CE2110A.ADA 
CE21 11B.ADA 
CE2111G.ADA 
CE2201A.ADA 
CE2201G.ADA 
CE2401A.ADA 
CE2401F. ADA 
CE2405B.ADA 
CE24'6^A.  ADA 
CE3002C.TST 
CE3104A.ADA 
CE3109A.ADA 
CE311 1C.ADA 
CE31 12B.ADA 
CE3206A. ADA 


C35507M.DEP 
C35508H.ADA 
C35703A.ADA 
C35904A.ADA 
C36204C.ADA 
C37209B.ADA 
C37215E.ADA 
C39005A.ADA 
C41402A.ADA 
C45252B.ADA 
C45532F.DEP 
C45621G.DEP 
C45621K.DEP 
C456210.DEP 
C45621S.DEP 
C45621W.DEP 
C46014A.ADA 
C47009B.ADA 
C64103B.ADA 
C64104H.ADA 
C64 1040. ADA 
C64109K.ADA 
C87B06A.ADA 
C97301B.ADA 
CCI3IIB.ADA 
CE2102C.TST 
CE2102G.ADA 
CE2102K.ADA 
CE2104B.ADA 
CE2105B.ADA 
CE2107B.ADA 
CE2107F.ADA 
CE2108A.ADA 
CE2109A.ADA 
CE2110B.ADA 
CE2111C.ADA 
CE2111H.ADA 
CE2201B.ADA 
CE2202A.ADA 
CE2401B.ADA 
CE2401H.ADA 
CE2406A.ADA 
CE2410A.ADA 
CE3102A.ADA 
CE3107A.TST 
CE3110A.ADA 
CE3111D.ADA 
CE3114A.ADA 
CE3208A.ADA 


C35507N.DEP 
C35508J.DEP 
C35711B.ADA 
C35904B.ADA 
C37107A.ADA 
C37213H.ADA 
C37215G.ADA 
C41307D.ADA 
C42007F.ADA 
C45273A.ADA 
C45532J.DEP 
C45621H.DEP 
C45621L.DEP 
C45621P.DEP 
C45621T.DEP 
C45621X.DEP 
C47005A.ADA 
C4A012B.ADA 
C64103E.ADA 
C64104I.ADA 
C64109H.ADA 
C64109L.ADA 
C87B19A.ADA 
C99004A.ADA 
CC3603A.ADA 
CE2102D.ADA 
CE2102H.TST 
CE2103A.TST 
CE2104C.ADA 
CE2106A.ADA 
CE2107C.ADA 
CE2107G.ADA 
CE2108B.ADA 
CE2109B.ADA 
CE21 10C.ADA 
CE2niD.ADA 
CE21 15A.ADA 
CE2201C.ADA 
CE2204A.ADA 
CE2401C.ADA 
CE2402A.ADA 
CE2407A.ADA 
CE241 1A.ADA 
CE3102B.TST 
CE3108A.ADA 
CE31 11A.ADA 
CE31 1 1E. ADA 
CE3114B.ADA 
CE3301A.ADA 


CE3302A.ADA 

CE3402C.ADA 

CE3403B.ADA 

CE3403F.ADA 

CE3405A.ADA 

CE3406B.ADA 

CE3407B.ADA 

CE3408C.ADA 

CE3409D.ADA 

CE3410C.ADA 

CE3411C.ADA 

CE3601A.ADA 

CE3602D.ADA 

CE3605B.ADA 

CE3606A.ADA 

CE3704B.ADA 

CE3704F.ADA 

CE3706C.ADA 

CE3707A.ADA 

CE3804B.ADA 

CE3804F.ADA 

CE3804M.ADA 

CE3806C.ADA 

CE3809B.ADA 

CE3905B.ADA 

CE3906B.ADA 

CE3906F.ADA 

In  addition 
were  modified 

MACRO. DFS 
CZ1102.ADA 


CE3303A.ADA 
CE3402D.ADA 
C 134030. ADA 
CE3404A.ADA 
CE3405C.ADA 
CE3406C.ADA 
CE3407C.ADA 
CE3409A.ADA 
CE3409E.ADA 
CE3410D.ADA 
CE3412A.ADA 
CE3602A.ADA 
CE3603A.ADA 
CE3605C.ADA 
CE3 606b. ADA 
CE3704C.ADA 
CE3704M.ADA 
CE3706D.ADA 
CE3708A.ADA 
CE3804C.ADA 
CE3804G.ADA 
CE3805A.ADA 
CE3806D.ADA 
CE3810A.ADA 
CE3905C.ADA 
CE3906C.ADA 
CE3908A.ADA 


CE3305A.ADA 
CE3402E.ADA 
CE3403D.ADA 
CE3404B.ADA 
CE3405D.ADA 
CE3406D.ADA 
CE3408A.ADA 
CE3409B.ADA 
CE3410A-ADA 
CE3410E.ADA 
CE341 3A. ADA 
CE3602B.ADA 
CE3604A.ADA 
CE3605D.ADA 
CE370U.ADA 
CE3704D.ADA 
CE3704N.ADA 
CE3706F.ADA 
CE3801A.ADA 
CE3804D.ADA 
CE3804I.ADA 
CE3805B.ADA 
CE3806E.ADA 
CE3901A.ADA 
CE3905L.ADA 
CE3906D.ADA 
E28005C.ADA 


CE3402A.ADA 

CE3403A.ADA 

CE3403E.ADA 

CE3404C.ADA 

CE3406A.ADA 

CE3407A.ADA 

CE3408B.ADA 

CE3409C.ADA 

CE3410B.ADA 

CE3411A.ADA 

CE3413C.ADA 

CE3602C.ADA 

CE3605A.ADA 

CE3605E.ADA 

CE3704A.ADA 

CE3704E.ADA 

CE37040.ADA 

CE3706G.ADA 

CE3804A.ADA 

CE3804E.ADA 

CE3804K.ADA 

CE3806A.ADA 

CE3809A.ADA 

CE3905A.ADA 

CE3906A.ADA 

CE3906E.ADA 


the  following  support  files  and  tests  for  support  files 
for  Version  1.10; 

REPSPEC.ADA  REPBODY.ADA  CZ 11 01  A. ADA 
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3  TEST  DELETIONS 


The  following  26  tests  appear  in  ACVC  Version  1.9,  but  not  in  ACVC 
Version  1.10.  Several  of  the  deleted  tests  were  renamed  to  new  test  names 
in  ACVC  1.10  to  conform  to  the  naming  conventions  provided  by  the 
Implementer 's  Guide  or  to  reflect  a  change  in  test  class. 


A37312A.ADA 

B34001S.ADA 

BC10AGA.ADA 

C910BDA.ADA 

CE3203A.ADA 

CE3405B.ADA 

E24101A.TST 


A41307A.ADA 

B86001C.DEP 

C35A03E.ADA 

C910BDB.ADA 

CE3301B.ADA 

CE3409F.ADA 

E66001D.ADA 


A41307C.ADA 

B86001D.TST 

C35A03R.ADA 

C950CHC.ADA 

CE3301C.ADA 

CE3410F.ADA 


B33006B.ADA 

B97102A.ADA 

C900ACA.ADA 

CE2210A.ADA 

CE3402B.ADA 

CE3412C.ADA 


4  NEW  TESTS 

The  following  623  tests  have  been  added  to  Version  1.10  of  the  ACVC  Test 
Suite.  A  test  is  considered  "new"  if  the  test  name  did  not  exist  in  ACVC 
Version  1.9.  Several  of  the  new  tests  were  renamed  from  former  tests  in 
ACVC  Version  1.9  to  conform  to  the  naming  conventions  provided  by  the 
Implementer ' 3  Guide  or  to  reflect  a  change  in  test  class. 


A98001A.ADA 
AD1C04D.DEP 
AD3015F.DEP 
AD7005A.ADA 
AD7102A.ADA 
B22003B.ADA 
B2A003D.ADA 
B33301B.ADA 
B34005K.ADA 
B34006B.ADA 
B34014B.ADA 
B34014K.ADA 
B34014S.ADA 
B37201B.ADA 
B64001B.ADA 
B67001I.ADA 
B86001C.ADA 
B86001G.ADA 
B86001K.ADA 
B860010.ADA 
B86001S.ADA 
B86001W.DEP 
B91003E.ADA 
397101G.ADA 
BD5001 A.ADA 


AD1009M.DEP 

AD3014C.DEP 

AD3015H.DEP 

AD7006A.ADA 

AD7103A.ADA 

B24204D.ADA 

B2A003E.ADA 

B34005B.ADA 

B34005N.ADA 

B34006E.ADA 

B34014D.ADA 

B34014M.ADA 

B34014V.ADA 

B37212B.ADA 

B64110A.ADA 

B67O01J.ADA 

B86001D.ADA 

B86001H.ADA 

B86001L.ADA 

B86001P.ADA 

B86001T.DEP 

B86001X.TST 

B95001C.ADA 

B97101H.ADA 

BD5002A.ADA 


ADI  009V. DEP 
AD3014F.DEP 
AD3015K.DEP 
AD7101A.ADA 
AD7103C.ADA 
B24204E.ADA 
B2A003F.ADA 
B34005E.ADA 
B34005Q.ADA 
B34006H.ADA 
B34014F.ADA 
B340140.ADA 
B34014X.ADA 
B41307B.ADA 
B66001D.ADA 
B67001K.ADA 
B86001E.ADA 
B86001I.ADA 
B86001M.ADA 
B86001Q.ADA 
B86001U.DEP 
B86001Y.TST 
B95069D.ADA 
BC3102C.ADA 
BD5002B.ADA 


AD1009W.DEP 

AD3015C.DEP 

AD7001B.ADA 

AD7101C.ADA 

AD7104A.ADA 

B24204F.ADA 

B33002A.ADA 

B34005H.ADA 

B34005T.ADA 

B34006K.ADA 

B34014I.ADA 

B34014Q.ADA 

B34014Z.ADA 

B44001B.ADA 

B67001H.ADA 

B85013D.ADA 

B86001F.ADA 

B86001J.ADA 

B86001N.ADA 

B86001R.ADA 

B86001V.DEP 

B86001Z.TST 

B95069E.ADA 

BC3123C.ADA 

BD5002C.ADA 


BD5002D.ADA 
BD5006B.ADA 
BD5008A.ADA 
BD5103A.ADA 
C32115B.ADA 
C34005D.ADA 
C34005J.ADA 
C34006A.ADA 
C34009A.ADA 
C34014G.ADA 
C34014N.ADA 
C34014U.ADA 
C35505F.ADA 
C35A06R.ADA 
C37312A.ADA 
C91004B.ADA 
C98001C.ADA 
CC1223A.ADA 
CC3 125c. ADA 
CC3220A.ADA 
CC3606A.ADA 
CD1009D.DEP 
CD1009H.DEP 
CD1009L.DEP 
CD1009Q.DEP 
CD1009U.DEP 
CD1C03A.DEP 
CD1C03F.DEP 
CD1C04A.DEP 
CD1C06A.DEP 
CD1D01D.ADA 
CD2A21B.DEP 
CD2A22A.DEP 
CD2A22E.DEP 
CD2A22I.DEP 
CD2A23C.DEP 
CD2A24B.DEP 
CD2A24F.DEP 
CD2A24J.DEP 
CD2A31D.DEP 
CD2A32D.DEP 
CD2A32H.DEP 
CD2A41B.DEP 
CD2A42A.DEP 
CD2A42E.DEP 
CD2A42I.DEP 
CD2A51C.DEP 
CD2A523.DEP 
CD2A52H.DEP 
CD2A53B.DEP 
CD2A54A.DEP 
CD2A54G.DEP 


BD5002E.ADA 
BD5006C.ADA 
BD5101A.ADA 
BD5104A.ADA 
C34004C.ADA 
C34005F.ADA 
C34005L.ADA 
C34006D.ADA 
C34014A.ADA 
C34014H.ADA 
C34014P.ADA 
C34014W.ADA 
C35A060.ADA 
C35A06S.ADA 
C41307A.ADA 
C91004C.ADA 
CC1221B.ADA 
CC3123A.ADA 
CC3125D.ADA 
CC 3221  A. ADA 
CD1009A.DEP 
CD1009E.DEP 
CD1009I.DEP 
CD1009N.DEP 
CD1009R.DEP 
CD1009X.DEP 
CD1C03B.ADA 
CD1C03G.DEP 
CD1C04B.DEP 
CD1D01A.ADA 
CD1D02A.ADA 
CD2A21C.DEP 
CD2A22B.DEP 
CD2A22F.DEP 
CD2A22J.DEP 
CD2A23D.DEP 
CD2A24C.DEP 
CD2A24G.DEP 
CD2A31 A.DEP 
CD2A32A.DEP 
CD2A32E.DEP 
CD2A32I.DEP 
CD2A4;iC.DEP 
CD2A42B.DEP 
CD2A42F.DEP 
CD2A42J.DEP 
CD2A51D.DEP 
CD2A52C.DEP 
CD2A52I.DEP 
CD2A53C.DEP 
CD2A54B.DEP 
CD2A54H.DEP 


BD5002F.ADA 
BD5006D.ADA 
BD510-1B.ADA 
BE3301C.ADA 
C34005A.ADA 
C34005G.ADA 
C34005M.ADA 
C34006F.ADA 
C34014C.ADA 
C34014J.ADA 
C34014R.ADA 
C34014Y.ADA 
C35A06P.ADA 
C37213K.ADA 
C4 1307c. ADA 
C95040B.ADA 
CC1221C.ADA 
CC3123B.ADA 
CC3126A.ADA 
CC3222A.ADA 
CD1009B.DEP 
CD1009F.DEP 
CD1009J.DEP 
CDIOO90.DEP 
CD1009S.DEP 
CD1009Y.DEP 
CD1C03C.TST 
CD1C03H.DEP 
CD1C04C.DEP 
CD1D01B.ADA 
CD1D03A.ADA 
CD2A21D.DEP 
CD2A22C.DEP 
CD2A22G.DEP 
CD2A23A.DEP 
CD2A23E.DEP 
CD2A24D.DEP 
CD2A24H.DEP 
CD2A31B.DEP 
CD2A32B.DEP 
CD2A32F.DEP 
CD2A32J.DEP 
CD2A41D.DEP 
CD2A42C.DEP 
CD2A42G.DEP 
CD2A51 A.DEP 
CD2A51E.DEP 
CD2A52D.DEP 
CD2A52J.DEP 
CD2A53D.DEP 
CD2A54C.DEP 
CD2A54I.DEP 


BD5005B. ADA 
BD5006J.ADA 
BD5102A.ADA 
C32111B.ADA 
C34005C.ADA 
C34005I.ADA 
C340050.ADA 
C34007J.ADA 
C34014E. ADA 
C34014L.ADA 
C34014T. ADA 
C35505E.ADA 
C35A06Q.ADA 
C37213L.ADA 
C41309A. ADA 
C98001B.ADA 
CC 122  ID. ADA 
CC3125B.ADA 
CC3127A. ADA 
CC3223A.ADA 
CD1009C.DEP 
CD1009G.DEP 
CD1009K.DEP 
CD1009P.DEP 
CD1009T.DEP 
CD1009Z.DEP 
CD1C03E.DEP 
CDICO3I.ADA 
CD1C04E.DEP 
CD1D01C.ADA 
CD2A21 A.DEP 
CD2A21E.DEP 
CD2A22D.DEP 
CD2A22H.DEP 
CD2A23B.DEP 
CD2A24 A.DEP 
CD2A24E.DEP 
CD2A24I.DEP 
CD2A31C.DEP 
CD2A32C.DEP 
CD2A32C.DEP 
CD2A41 A.DEP 
CD2A41E.DEP 
CD2A42D.DEP 
CD2A42H.DEP 
CD2A51B.DEP 
CD2A52A.DEP 
CD2A52G.DEP 
CD2A53A.DEP 
CD2A53E.DEP 
CD2A54D.DEP 
CD2A54J.DEP 


CD2A61A.DEP 

CD2A61E.DEP 

CD2A61I.DEP 

CD2A62A.DEP 

CD2A63A.DEP 

CD2A64A.DEP 

CD2A65A.DEP 

CD2A66A.DEP 

CD2A71A.DEP 

CD2A72A.DEP 

CD2A73A.DEP 

CD2A74A.DEP 

CD2A75A.DEP 

CD2A76A.DEP 

CD2A81A.TST 

CD2A81E.TST 

CD2A83B.TST ■ 

CD2A83G.TST 

CD2A84E.DEP 

CD2A84I.DEP 

CD2A84N.DEP 

CD2A91C.TST 

CD2B11B.DEP 

CD2B11F.DEP 

CD2B16A.DEP 

CD2C11D.DEP 

CD2D13A.DEP 

CD3014E.DEP 

CD3015E.DEP 

CD3015L.DEP 

CD4051A.DEP 

CD5003B.DEP 

CD5003F.DEP 

CD5007B.DEP 

CD501 1D.DEP 

CD5011H.DEP 

CD501 1M.DEP 

CD5011R.DEP 

CD5012C.DEP 

CD5012G.DEP 

CD5012L.DEP 

CD5013C.DEP 

CD5013G.DEP 

CD5013L.DEP 

CD5013R.DEP 

CD5014C.DEP 

CD5014G.DEP 

CD5014K.DEP 

CD5014O.DEP 

CD5014U.DEP 

CD5014Y.DEP 

CD7004C.TST 


CD2A61B.DEP 

CD2A61F.DEP 

CD2A61J.DEP 

CD2A62B.DEP 

CD2A63B.DEP 

CD2A64B.DEP 

CD2A65B.DEP 

CD2A66B.DEP 

CD2A71B.DEP 

CD2A72B.DEP 

CD2A73B.DEP 

CD2A74B.DEP 

CD2A75B.DEP 

CD2A76B.DEP 

CD2A81B.TST 

CD2A81F.TST 

CD2A83C.TST 

CD2A84B.DEP 

CD2A84F.DEP 

CD2A84K.DEP 

CD2A87A.TST 

CD2A91D-TST 

CD2B1 1C.DEP 

CD2B11G.DEP 

CD2C11A.DEP 

CD2C11E.DEP 

CD3014A.DEP 

CD3015A.DEP 

CD3015G.DEP 

CD3021A.DEP 

CD4051B.DEP 

CD5003C.DEP 

CD5003G.DEP 

CD5011A.DEP 

CD501 1E.DEP 

CD5011I.DEP 

CD501 1N.DEP 

CD5011S.DEP 

CD5012D.DEP 

CD5012H.DEP 

CD5012M.DEP 

CD5013D.DEP 

CD5015H.DEP 

CD5013M.DEP 

CD5013S.DEP 

CD5014D.DEP 

CD5014H.DEP 

CD5014L.DEP 

CD5014R.DEP 

CD5014V.nEP 

CD5014Z.DEP 

CD7004D.TST 


CD2A61C.DEP 

CD2A61G.DEP 

CD2A61K.DEP 

CD2A62C.DEP 

CD2A63C.DEP 

CD2A64C.DEP 

CD2A65C.DEP 

CD2A66C.DEP 

CD2A71C.DEP 

CD2A72C.DEP 

CD2A73C.DEP 

CD2A74C.DEP 

CD2A75C.DEP 

CD2A76C.DEP 

CD2A81C.TST 

CD2A81G.TST 

CD2A83E.TST 

CD2A84C.DEP 

CD2A84G.DEP 

CD2A84L.DEP 

CD2A91A.TST 

CD2A91E.TST 

CD2B1 1D.DEP 

CD2B15B.DEP 

CD2C11B.DEP 

CD2D11A.DEP 

CD3014B.DEP 

CD3015B.DEP 

CD3015I.DEP 

CD4031A.DEP 

CD4051C.DEP 

CD5003D.DEP 

CD5003H.DEP 

CD5011B.DEP 

CD5011F.DEP 

CD5011K.DEP 

CD50110.DEP 

CD5012A.DEP 

CD5012E.DEP 

CD5012I.DEP 

CD5013A.DEP 

CD5013E.DEP 

CD50-.3I.DEP 

CD5013N.DEP 

CD5014A.DEP 

CD5014E.DEP 

CD5014I.DEP 

CD5014M.DEP 

CD5014S.DEP 

CD5014W.DEP 

CD7003A.TST 

CD7005B.TST 


CD2A61D.DEP 

CD2A61H.DEP 

CD2A61L.DEP 

CD2A62D.DEP 

CD2A63D.DEP 

CD2A64D.DEP 

CD2A65D.DEP 

CD2A66D.DEP 

CD2A71D.DEP 

CD2A72D.DEP 

CD2A73D.DEP 

CD2A74D.DEP 

CD2A75D.DEP 

CD2A76D.DEP 

CD2A81D.TST 

CD2A83A.TST 

CD2A83F.TST 

CD2A84D.DEP 

CD2A84H.DEP 

CD2A84M.DEP 

CD2A91B.TST 

CD2A95A.TST 

CD2B11E.DEP 

CD2B15C.DEP 

CD2C11C.DEP 

CD2D11B.DEP 

CD3014D.DEP 

CD3015D.DEP 

CD3015J.DEP 

CD4041A.DEP 

CD4051D.DEP 

CD5003E.DEP 

CD5003I.DEP 

CD5011C.DEP 

CD5011G.DEP 

CD5011L.DEP 

CD501 1Q.DEP 

CD5012B.DEP 

CD5012F.DEP 

CD5012J.DEP 

CD5013B.DEP 

CD5013F.DEP 

CD5013K.DEP 

CD50130.DEP 

CD5014B.DEP 

CD5014F.DEP 

CD5014J.DEP 

CD5014N.DEP 

CD5014T.DEP 

CD5014X.DE? 

CD7004A.TST 

CD7005E.TST 
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CD7006B.TST 

CD7101B.TST 

CD7101G.TST 

CD7104B.TST 

CD7204C.DEP 

CE2102M.ADA 

CE2102Q.ADA 

CE2102U.ADA 

CE2102Y.ADA 

CE2108E.ADA 

CE2110D.ADA 

CE2201I.ADA 

CE2201M.ADA 

CE2205A.ADA 

CE2401L.ADA 

CE2409B.ADA 

CE3102F.ADA 

CE3102J.ADA 

CE3107B.ADA 

CE3411B.ADA 

CE3804J.ADA 

CE3804P.ADA 

CE3806H.ADA 

ED2A26A.DEP 

ED7005C.TST 

EE3203A.ADA 

EE3409F.ADA 


CD7006E.TST 

CD7101D.ADA 

CD7102B.TST 

CD7105A.ADA 

CD7205C.DEP 

CE2102N.ADA 

CE2102R.ADA 

CE2102V.ADA 

CE2103C.ADA 

CE2108F.ADA 

CE2111F.ADA 

CE2201J.ADA 

CE2201N.ADA 

CE24011.ADA 

CE2404B.ADA 

CE2410B.ADA 

CE3102G.ADA 

CE3102K.ADA 

CE3112C.ADA 

CE3604B.ADA 

CE3804L.ADA 

CE3806B.ADA 

CE3810B.ADA 

ED2A56A.DEP 

ED7005D.TST 

EE3301B.ADA 

EE3410F.ADA 


CD7007B.ADA 
CD7101E.DEP 
CD7103B.TST 
CD7203B.ADA 
CD7205D.DEP 
CE2 1020. ADA 
CE2102S.ADA 
CE2102W.ADA 
CE2103D.ADA 
CE2108G.ADA 
CE2111I.ADA 
CE2201K.ADA 
CE2204C.ADA 
CE2401J.ADA 
CE2407B.ADA 
CE3102D.ADA 
CE3102H.ADA 
CE3104B.ADA 
CE3112D.ADA 
CE3801B.ADA 
CE3804N.ADA 
CE3806F.ADA 
E24201A.TST 
ED2A86A.TST 
ED7006C.TST 
EE3402B.ADA 
EE3412C.ADA 


CD7007C.TST 

CD7101F.DEP 

CD7103D.TST 

CD7204B.ADA 

CE2102L.ADA 

CE2102P.ADA 

CE2102T.ADA 

CE2102X.ADA 

CE2107L.ADA 

CE2108H.ADA 

CE2201H.ADA 

CE2201L.ADA 

CE2204D.ADA 

CE2401K.ADA 

CE2408B.ADA 

CE3102E.ADA 

CE3102I.ADA 

CE3104C.ADA 

CE3404D.ADA 

CE3804H.ADA 

CE38040.ADA 

CE3806G.ADA 

ED1D04A.DEP 

ED7004B.TST 

ED7006D.TST 

EE3405B.ADA 


In  addition,  one  new  support  unit  (in  one  file),  a  system  of  programs 
(in  165  files)  designed  to  aid  in  the  validation  process,  and  a  macro 
substitution  program  have  been  added  to  ACVC  Version  1.10; 

SPPRT13.ADA  (The  specification  of  a  package  whose  body  must  be 
provided  by  the  user.) 

AVAT  (One  package  in  files  DATSPEC.ADA  and  DATBODY.ADA; 

all  other  units  in  files  whose  names  have  the  form 
"AVAT%?5(.ext"  where  each  %  is  replaced  by  a  letter 
or  digit  and  "ext"  is  either  "ADA"  or  "TST".) 

MACROSUB  A  program  which  modifies  the  "TST"  tests  inserting  the 

values  supplied  in  the  file  MACRO. DFS.  MACRO. DFS 
must  be  modified  to  reflect  the  implementation  dependent 
values  of  the  compiler. 


ACVC  1.10  Tape  Information 


1  INTRODUCTION 

The  ACVC  testa  are  written  in  ANSI  Standard  format  on  one  tape 
volume.  There  are  4358  test  files  in  the  ACVC  Version  1.10.  On  the 
ANSI  Standard  format  tape,  there  are  a  total  of  266  files.  Each  of  39 
of  these  files  contains  multiple  teats  packed  onto  a  single  file  to  save 
space  on  the  tape  volume.  There  are  59  single  teat  files  for  tests 
containing  non-graphical  characters  or  long  text  lines;  one  Ada  program 
to  retrieve  individual  testa  from  the  packed  multi-test  files;  a  system 
of  programs  (in  165  files)  designed  to  aid  in  the  validation  process;  a 
macro  substitution  program;  and  a  list  of  all  the  ACVC  Version  1.10  test 
files.  The  tape  is  written  at  a  density  of  1600  bpl. 


2  TAPE  FORMAT 

The  ACVC  testa  are  written  on  one  tape  volume.  Each  file  on  the 
tape  is  written  as  a  set  of  variable-length  records  in  blocks  of  2048 
characters,  using  the  ANSI  variable-length  record  (D),  blocked  format. 
Each  file  in  this  format  has  the  structure  shown  in  Figure  1. 

Each  data  block  is  2048  characters  in  length.  Each  record  within  a 
block  represents  a  line  of  text.  The  first  four  characters  of  each 
record  make  up  the  Record  Cdfttrol  Word  (RCW).  The  record  length  (the 
number  of  characters  contained  in  the  record)  is  expressed  as  a  sequence 
of  four  ASCII  characters  occupying  the  entire  RCW  emd  yielding  a  decimal 
value.  The  record  length  includes  the  length  of  the  RCW.  Hence,  a 
blank  (empty)  line  is  represented  by  the  record  0004.  A  line  containing 
the  characters  ADA  would  be  represented  as  0007ADA.  Each  record  is 
completely  contained  within  a  block.  If  a  record  including  the 
four-character  RCW  cannot  be  contained  in  the  space  remaining  in  a 
block,  then  each  remaining  byte  in  the  block  is  set  to  a  circumflex  (~), 
and  the  record  is  placed  in  the  next  block.  Figure  2  shows  the  format 
of  a  file  that  partially ;fills  a  data  block. 


Page  3 


0018—  C35702B.DEP00040050—  CHECK  THAT  L0NG_FL0AT' DIGITS  >  FLOA 
T'DIGITS00040020—  BAW  5  SEPT  800018—  SPS  2/18/8300040016VITH  R 
EPORT;0024PR0CEDURE  C35702B  IS00040020  USE  REPORT ;00040075BE 
GIN  TEST( "0357028", "CHECK  IF  LONG_FLOAT  HAS  MORE  DIGITS  THAN  FLO 
AT"); 00040046  IF  FLOAT 'DIGITS  >»  LONG_FLOAT' DIGITS0070 
THEN  FAILED("LONG  FLOAT  HAS  NOT  MORE  PRECISION  THAN  FLOAT"); 001 
7  END  IF:OOO40O17  RESULT ;00040016END  C35702B; . 


Figure  2. 
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3  AC VC  TEST  FILES 

The  ACVC  tests  are  stored  on  the  tape  using  a  method  that  packs  many 
tests  into  one  file.  There  are  39  multi-test-formatted  files  on  the 
tape  (named  ACVC1 • . . ACVC39) ,  35  separate  files  containing  individual 
teats  with  special  control  characters,  and  24  separate  files  containing 
individual  tests  with  lines  over  72  characters  long.  Files 
ACVC1 . . .ACVC39  do  not  contain  any  text  lines  over  72  characters  long. 
Also  on  the  tape  is  am  Ada  program  UNPACK  that  can  be  used  on  some 
systems  to  retrieve  the  individual  ACVC  teats  from  the  packed  files;  a 
system  of  programs  designed  to  aid  in  the  validation  process;  a  macro 
substitution  program;  amd  one  file  that  contains  the  naimea  of  all  the 
ACVC  tests  included  in  the  files,  ACVC10.LST.  This  is  the  order  in 
which  the  files  appear  on  the  tape: 

.  File  1  :  UNPACK. ADA 

.  File  2  :  ACVC10.LST 

.  Files  3  -  41  :  ACVC1 . . .ACVC39 

.  Files  42-76  :  Individual  files  with  nongraphic  ASCII 

characters 

.  Files  77  -  100  :  Individual  files  with  long  lines 

.  File  101  :  MACBOSUB.ADA 

.  Files  102  -  266  ;  Files  designed  to  aid  in  the  validation 
process 


Figure  3  shows  how  the  ftles  are  structured  on  the  tape .  The 
multifile  test  files  have  this  repeating  structure: 

.  <<<  test  name 

.  an  ACVC  test 

.  >>>  test  naime  (blank)  number  of  lines  in  the  test 

Figure  4  shows  am  example  of  the  structure  of  the  ACVC  multifile  format. 
The  number  of  lines  given ''at  the  end  of  each  file  following  the  >>>  can 
be  used  to  check  that  the  file  was  unpacked  properly. 

UNPACK  will  work  to  separate  the  individual  tests  if  the  packed 
file  read  from  the  tape  is  in  a  format  that  conforms  to  the  format  used 
by  the  implementation  of  the  Ada  package  TEXT_I0.  UNPACK  reads  a  packed 
file  of  tests  and  puts  each  of  the  tests  into  a  single  file.  UNPACK 
requires  as  input  the  name  of  the  file  to  be  unpacked.  New  files  are 
created  using  the  ACVC  test  name  as  the  file  name.  UNPACK  will  need  to 
be  run  once  for  each  packed  file. 

The  program  text  may  have  to  be  modified  to  coincide  with  the 
file-naming  conventions  of  the  system  onto  which  the  tests  will  be 
loaded.  The  TEXT_I0. CREATE  command  on  line  36  of  the  program  UNPACK 
creates  a  file  using  the  returned  value  from  the  function  TESTFILE_NAME. 


It"  W  IDTlUTOni."  HF  W IV,  W  »?l  VM*n 
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MULTIFILE  FORMAT 


«< 


TEST-FILE-NAME 


--TESTNAME1.  ADA 


SECOND  LINE  OF  FILE 


THIRD  UNE  OF  FILE 


LINE  COUNT 


1 

2 


_ LAST  LINE  OF  RLE _ 

>»  TEST-FILE-NAME  LINE-COUNT 
<«TEST-nLE-NAME 
--TESTNAME  2.  DEP 


SECOND  LINE  OF  FILE 


Figure  3. 


«<  C35702B.DEP 

-  -  C35702B.DEP 

-  -  CHECK  THATLONG_«.OATDIGITS  >  FLOATDIGITS 

--BAW5SEPT80 

-  -  SPS  2/18/83 

WITH  REPORT: 

PROCEDURE  C35702B  IS 

USE  REPORT; 

BEGIN  TESTCC35702B" ."CHECK  IF  LONG_FLOAT  HAS  MORE  DIGITS  THAN  FLOAT); 
IF  FLOATDIGITS^^  LONG  FLOATDIGITS 

THEN  FAILED("LONG  FLOAT  HAS  NOT  MORE  PRECISION  THAN  FLOAT); 

END  IF; 


RESULT; 

END  C35702B: 

»>  C35702B.DEP  21 


A-D8780 


Figure  4. 
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Modifications  may  be  made  inside  this  function  to  provide  conformance  to 
the  file-naming  conventions  of  the  system.  Without  modification, 
program  UNPACK  will  try  to  name  the  new  files  it  creates  with  the  names 
in  the  packed  files  that  are  listed  after  "«<  In  figure  4, 
C35702B.DE3*  would  be  the  name  of  the  new  file  created  which  would  not 
agree  with  the  file  naming  conventions  of  some  systems. 

The  specification,  REPSPEC,  and  body,  REPBODY,  of  package  REPORT 
and  the  support  unit  SPPRT1 3SP.ADA  are  included  in  the  packed  file 
ACVC39.  Package  REPORT  is  used  in  many  of  the  ACVC  tests.  Therefore, 
ACVC39  should  be  unpacked  and  REPSPEC,  REPBODY,  and  SPPRT13SP  compiled 
before  any  of  the  ACVC  tests  are  run. 


4  MULTIFILE  TEST  FILE  CONTENTS 


The  following  list  shows  each  multifile  test  file  with  its  corresponding 
number  of  individual  files  in  it.  This  list  may  be  helpful  in  unpacking 
the  files.  UNPACK  will  display  the  number  of  test  files  it  retrieves 
from  each  packed  file. 

FILE  FILES  CREATED 


ACVC1 

ACVC2 

ACVC3 

ACVC4 

ACVC5 

ACVC6 

ACVC7 

ACVC8 

ACVC9 

ACVC10 

ACVC 1 1 

ACVC12 

ACVC 13 

ACVC 14 

ACVC 15 

ACVC 16 

ACVC 17 

ACVC 18 

ACVC 19 

ACVC20 

ACVC 21 

ACVC22 

ACVC 2 3 

ACVC24 

ACVC 25 

ACVC26 

ACVC27 

ACVC28 

ACVC29 

ACVC30 

ACVC 31 

ACVC32 

ACVC 33 

ACVC34 

ACVC 35 

ACVC36 

ACVC 37 

ACVC38 

ACVC 39 


198 

71 

155 

138 
214 
148 
337 
157 

51 

73 

139 
41 

44 

52 
90 

100 

63 

62 

41 

62 

74 
48 
83 

75 
144 

85 
105 
228 
100 

48 

40 

45 

=  '  108 
125 
98 

86 
125 
184 


5  FILES  WITH  NONGRAPHIC  CHARACTERS 


Thirty-five  of  the  files  in  the  ACVC  test  suite  contain  ASCII 
control  characters.  These  files  are  stored  individually  on  the 
distribution  tape.  The  following  list  shows  the  files  with  the 
corresponding  control  characters  in  the  file. 


A22006B.ADA 

HT 

A22006C.ADA 

CR, 

VT, 

LF, 

FF 

A22006D.ADA 

HT 

•A22006E.ADA 

CR, 

VT, 

LF, 

FF 

A22006F.ADA 

HT 

B22005A.ADA 

SOH 

B22005B.ADA 

STX 

B22005C.ADA 

ETX 

B22005D.ADA 

EOT 

B22005E.ADA 

ENQ 

B22005F.ADA 

ACK 

B22005G.ADA 

BEL 

B22005H.ADA 

BS 

B22005I.ADA 

NUL 

B22005J.ADA 

DEL 

B22005K.ADA 

FS, 

ESC 

B22005L.ADA 

GS, 

US 

B22005M.ADA 

RS 

B22005N.ADA 

SO 

B220050.ADA 

SI 

B22005P.ADA 

DLE 

B22005Q.ADA 

DC1 

B22005R.ADA 

DC2 

B22005S.ADA 

DC  3 

B22005T.ADA 

DC4 

B22005U.ADA 

NAK 

B22005V.ADA 

SYN 

B22005W.ADA 

ETB 

B22005X.ADA 

CAN 

B22005Y.ADA 

EM 

B22005Z.ADA 

SUB 

B25002A.ADA 

Control 

Charact 

ESC, 

,  FS, 

r  GS, 

RJ 

B25002B.ADA 

HT, 

VT, 

CR, 

LF, 

B26005A.ADA  Control  Characters  SOH  through  SUB,  ESC,  FS,  GS,  RS, 
US,  NUL,  DEL'- 

B27005A.ADA  Control  Characters  SOH  through  BS,  and  SO  through  SUB, 
NUL,  ESC,  FS,  GS,  RS,  US,  DEL 


B27005A.ADA 


6  FILES  WITH  LONG  TEXT  LINES 


Twenty-four  of  the  files  in  the  ACVC  test  suite  contain  lines 
longer  than  72  characters.  These  files  are  stored  individually  on  the 
distribution  tape.  The  following  table  shows  the  files  that  have  long 
lines  along  with  the  length  of  the  longest  line  in  the  file. 

TEST  NAMES  LENGTH  (characters) 


C24113C.DEP 

78 

C24113D.DEP 

86 

C24113E.DEP 

95 

C24113F.DEP 

106 

C24113G.DEP 

114 

C24113H.DEP 

123 

C24113I.DEP 

134 

C24113J.DEP 

142 

C24113K.DEP 

151 

C24113L.DEP 

162 

C24113M.DEP 

170 

C24113N.DEP 

179 

C241130.DEP 

190 

02411 3P.DEP 

198 

C24113Q.DEP 

207 

C24113R.DEP 

218 

C24113S.DEP 

226 

C24113T.DEP 

235 

C24113U.DEP 

247 

0241 13V. DEP 

255 

024113W.DEP 

264 

0241 13X. DEP 

275 

024113Y.DEP 

283 

MAORO.DFS 

87 
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7  ACVC  TEST  FILE  NAMES 

ACVC  test  file  names  may  not  conform  to  the  naming  conventions  of 
the  computer  system  on  which  the  files  are  to  be  read.  The  test  file 
names  follow  certain  conventions.  However,  certain  portions  of  a  name 
provide  information  but  may  be  removed  to  shorten  a  name  while 
preserving  uniqueness. 

The  maximum  length  of  a  teat  file  descriptor  is  13  characters, 
which  consists  of  a  file  name  and  file  type.  The  last  four  characters 
designate  the  file  type — a  period  followed  by  three  letters — and  can  be 
deleted  without  creating  duplicate  file  names.  When  a  file  name 
consists  of  nine  characters  followed  by  a  period,  the  ninth  character  is 
always  M  and  can  be  deleted.  All  other  test  file  names  are  seven  or 
eight  characters  in  length  before  a  period  occvirs.  Finally,  the  first 
letter  of  each  teat  file  name  can  be  safely  deleted  without  creating 
duplicate  file  names.  If  all  these  deletions  are  performed,  test  files 
will  have  names  that  are  six  to  nine  characters  in  length. 


8  TEST  MODIFICATION 

The  Ada  teats  will  be  periodically  updated  and  corrected.  Their 
correctness  la  not  guaranteed  either  by  the  ACVC  Maintenance 
Organization  (AMO)  or  by  its  contractor.  Please  report  errors  in 
writing  to: 

Mr.  Steve  Wilson 

ACVC  Maintenance  Organization 

ASD/SCOL 

Wright-Patterson  AFB,  OH  45433-6503 

You  will  receive  notification  of  changes  to  this  version  of  the 
ACVC  on  a  periodic  basis.  Please  notify  the  AMO  of  any  change  of 
address . 
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ACVC  User's  Guide  (ACVC  Version  1.10) 


1  Scope. 

1.1  Identification. 

This  is  the  Ada  Compiler  Validation  Capability  (ACVC)  User's  Guide. 
This  document  details  the  use  of  Version  1.10  of  the  ACVC. 


1.2  Purpose. 

This  user's  guide  describes  the  k^Z  test  suite,  its  use,  and 
interpretation  of  the  test  results.  It  should  be  read  by  anyone  who  wishes 
to  use  the  ACVC  to  test  an  implementation  of  the  Ada  language. 


1.3  Introduction. 

The  primary  purpose  of  the  ACVC  is  to  help  decide  whether  an  Ada 

translator/compiler  conforms  to  AMSI/MIL-STD-1815A,  the  Reference  Manual 
for  the  Ada  Programming  Language  (RM).  The  RH  is  also  known  as  the  Ada 
Standard.  The  kCSZ  is  maintained  by  the  kC^Z  Maintenance  Organization 
(AMO)  under  the  direction  of  the  Ada  Validation  Office  (AVO)  of  the  Air 
Force's  Ada  Joint  Program  Office  (AJPO).  The  three  main  components  of  the 
ACVC  are: 

.  An  implementers'  guide  that  describes  the  implementation 

implications  of  the  RM  and  the  conditions  that  are  checked  by  each 
validation  test  program. 

.  A  suite  of  validation  test  programs  that  are  submitted  to  a 

compiler. 

.  Validation  support  tools  that  assist  in  determining  system 

capabilities,  preparing  tests  for  compilation,  and  analyzing  the 
results  of  execution. 


2  References. 


1.  ANSI/MIL-STD-1815A  (The  Reference  Manual  for  the  Ada  Programming 
Language),  22  January  1983. 

2.  Ada  Compiler.  Validation  Procedures  and  Guidelines,  Ada  Joint 
Program  Office,  1  January  1987. 

3.  A^  Compiler  Validation  Capability  Implementers'  Guide,  SofTech, 
Inc . ,  1  December  1986. 


4. 


ACVC  Version  1.10  Version  Description  Document ,  SofTech,  Inc., 
1  December  1987. 


ACVC  User's  Guide  (ACVC  Version  1.10) 


5.  ACVC  Test  Design  and  Coding  Standards,  SofTech,  Inc., 
1  December  198o. 


3  Instruction  For  Use. 

3.1  Ada  Compiler  Validation  Capability  Implementers'  Guide. 

All  of  the  ACVC  test  programs  are  based  on  objectives  given  in  the  Ada 
Compiler  Validation  Capability  Implementers'  Guide  (AIG).  The  AIG 
basically  follows  the  RN.  However,  the  AIG  contains  additional  sections 
which  further  clarify  the  rules  of  the  language,  details  the  interpretation 
of  any  ambiguities  in  the  RM,  and  presents  objectives  and  guidelines  for 
the  tests. 


3.2  Validation  Test  ’’rograms. 

The  ACVC  test  suite  is  composed  of  various  test  programs  designed  to 
ensure  that  a  compiler  correctly  conforms  to  all  aspects  of  the  RH.  The 
test  suite  also  attempts  to  ensure  that  the  implementation  does  not  add  any 
illegal  extentions  to  the  language. 

The  goals  of  the  ACVC  include: 

.  Maximizing  the  amount  of  information  derived  from  a  validation 
attempt;  in  particular,  identifying  as  many  nonconformances  as 
possible. 

.  Minimizing  the  effort  needed  to  test  a  compiler;  in  particular, 
the  effort  needed  to  a)  adapt  the  tests  to  a  particular  compiler 
environment,  and  b)  determine  which  tests  passed  and  which 
failed. 

.  Minimizing  the  effort  needed  to  determine  if  a  test  is  correct 
(that  is,  if  it  uses  an  appropriate  algorithm  to  check  the 
objective)  when  failed  on  a  compiler. 

.  A  thorough  coverage  of  the  language  and  the  possible 
implementations  of  its  features. 

Making  the  tests  understandable  and  maintainable. 
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3.2.1  Test  Naming  Conventions. 

Test  names  have  the  form  <name>.<type>.  The  <name>  component  is 
composed  of  seven  to  nine  characters.  The  interpretation  of  each  character 
is  described  below,  where  the  first  column  indicates  the  character 
positlon(s)  and  the  second  column  gives  the  corresponding  meaning: 

1  Test  classification  (letter)  -  identifies  the  class  of  the 
test  (see  Classifications). 

2  AIG  chapter  (hexadecimal)  -  identifies  the  chapter  which 
contains  the  objective  being  tested. 

3  Section  (hexadecimal)  -  identifies  the  section  within  the 
above  chapter. 

4  Sub-section  (alpha-numeric)  -  identifies  the  sub-section 
within  the  above  section. 

5,  6  Test  objective  (decimal)  -  identifies  the  objective,  within 
the  above  sub-section,  being  tested. 

7  Sub-objective  (letter)  -  indicates  a  sub-objective  of  the 
above  objective. 

8  Compilation  sequence  (alpha-numeric)  -  indicates  the 
compilation  order  of  multiple  files  that  comprise  a  single 
test  (0  is  compiled  first).  This  position  is  present  only  if 
the  test  is  composed  of  multiple  files. 

9  Main  subprogram  indication  (character  'M')  -  indicates  which 
file  of  a  test  set  contains  the  main  procedure.  This  position 
is  present  only  for  one  file  of  a  multi-file  test. 


The  <type>  component  is  a  three-character  extension  which  identifies 
the  type  of  the  test  (see  Type  Extensions). 

Characters  2-7  of  the  <name>  component  uniquely  identify  every  test 
objective.  Each  individual  objective  has  only  a  single  classification  and 
type  designation  associated  with  it.  The  classification  and  type  of  a  test 
indicates  its  expected  compilation/execution  results. 


3. 2. 1.1  Classifications. 

The  test  classifications  are  A,  B,  C,  D,  E,  and  L.  Tests  that  come 
under  classes  A,  C,  0,  and  B  are  also  considered  executable  tests. 


3. 2. 1.1.1  Class  A. 

class  A  tests  ensure  acceptance  (compilation)  of  certain  language 
constructs  which  cannot  be  verified  at  run  time.  There  are  no  testing 
conditions  within  them.  These  tests  are  expected  to  execute  successfully  - 
they  simply  report  'PASSED'.  An  implementation  is  considered  to  have 
failed  any  test  for  which  it  does  not  indicate  otherwise. 
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3.2. 1.1.2  Class  B. 

Class  B  tests  check  that  illegal  constructs  are  caught  and  that  there 
are  no  illegal  extentions  to  the  language.  These  tests  are  expected  to 
fail  compilation.  They  are  graded  as  'PASSED'  if  all  of  the  indicated 
errors  in  the  test  are  caught  and  no  legal  constructs  are  rejected.  An 
implementation  is  considered  to  have  failed  any  test  for  which  an  error  is 
not  caught  or  a  legal  construct  is  rejected. 

Lines  containing  errors  which  must  be  caught  are  marked  ' —  ERROR:'. 
This  error  comment  may  also  include  a  very  brief  Indication  of  what  makes 
the  construct  illegal.  Lines  containing  legal  constructs  which  must  be 
accepted  are  marked  ' —  OK.'. 

The  following  rules  apply  in  satisfying  the  pass  criteria: 

.  The  compiler  rejects  a  test  which  contains  only  a  single  error. 

.  The  compiler  displays  an  error  message  for  all  of  the  ' —  ERROR:' 
indications  in  a  test  with  multiple  errors. 

.  All  lines  marked  ' —  OK.'  are  accepted. 

.  Split  tests  can  be  created  (see  Modifying  Tests). 


3. 2. 1.1. 3  Class  C. 

Class  C  tests  check  the  run-time  system  and  ensure  that  verifiable 
constructs  are  implemented  correctly.  These  tests  are  expected  to  execute. 
The  tests  will  indicate  either  'PASSED',  'FAILED',  or  'NOT_APPLICABLE' 
based  on  the  conditions  tested.  An  implementation  is  considered  to  have 
failed  any  test  for  which  it  does  not  indicate  otherwise. 


3. 2. 1.1.4  Class  D. 

Class  D  tests  are  capacity  tests.  These  tests  are  expected  to  execute 
successfully  if  no  errors  are  reported  during  compilation.  If  an  error  is 
reported  during  compilation,  it  must  be  an  error  associated  with  the 
capacity  being  tested,  in  which  case  the  test  is  considered  inapplicable. 
Otherwise,  an  implementation  may  be  considered  to  have  failed  any  test  for 
which  it  does  not  indicate  differently;  such  failure  should  be  reported  to 
the  AVO  for  a  ruling. 


3. 2. 1.1. 5  Class  E. 

Class  E  tests  check  implementation-dependent  options  and  the 
resolution  of  ambiguities  in  the  RM.  These  tests  are  expected  to  execute 
successfully.  Tests  which  execute  print  comments  to  indicate  how  the 
options  or  ambiguities  are  handled.  The  source  code  for  each  test  lists 
specific  pass/fail  criteria.  For  some  tests,  these  criteria  are  indicated 


ACVC  User's  Guide  (ACVC  Version  1.10) 


at  execution  time.  These  criteria  are  compared  to  the  comments  to  make  a 
grading  determination.  An  implementation  is  considered  to  have  failed  any 
test  for  which  it  does  not  indicate  otherwise. 


3. 2. 1.1. 6  Class  L. 

Class  L  tests  ensure  that  all  library  unit  dependencies  within  a 
program  are  satisfied  before  said  program  can  be  linked  and  executed,  and 
that  circularity  among  units  is  not  allowed.  These  tests  are  expected  to 
fail  at  link  time;  however,  failure  to  compile  may  be  acceptable  for  some 
implementations.  These  tests  are  graded  as  'PASSED'  if  they  do  not 
successfully  complete  the  link  phase.  Any  test  which  begins  execution  is 
graded  as  'FAILED'. 

For  tests  which  might  possibly  fail  at  compile  time,  the  lines 
containing  the  illegal  constructs  are  marked  ' —  ERROR:'. 


3. 2. 1.2  Type  Extensions. 

The  type  extensions  and  their  meanings  are: 

ADA  -  These  tests  check  the  standard  features  of  the  language  that 
must  be  Implemented  by  all  compilers.  They  are  expected  to  be 
compiled/executed  unmodified  and  must  be  successfully  processed 
by  all  implementations. 

DEP  -  These  tests  involve  optional,  implementation-dependent  features 
of  the  language.  Each  test  concerned  with  supported  features 
must  be  successfully  processed  as  indicated  by  its 

classification.  Tests  concerned  with  unsupported  features  are 
considered  inapplicable,  provided  they  are  processed  as 

described  below: 

.  Class  B  tests  should  be  successfully  compiled. 

.  Executable  tests  must  be  rejected  at  compile  time  as 
described  in  the  test's  applicability  criteria. 

TST  -  These  tests  also  check  implementation-dependent  features  of  the 
language.  They  contain  macros  for  the  substitution  of  certain 
implementation-dependent  values  (see  Macro  Substitutions). 
Generally,  each  of  these  tests  is  expected  to  be  successfully 
processed  as  indicated  by  its  classification.  However,  some  of 
the  tests,  may  be  concerned  with  unsupported  features  and 
therefore  ate  treated  as  described  for  DEP  tests. 


3.2.2  Coding  Standards. 

To  help  meet  the  goals  of  the  ACVC,  certain  coding  standards  are 
followed. 
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3.2.2. 1  General. 

Some  general  test  writing  standards  include: 

.  Tests  are  written  using  the  basic  S5-character  character-set  (26 
capital  letters,  10  digits,  and  19  punctuation  marks). 

.  Maximum  line  length  is  72  characters,  except  as  noted  in  certain 
DEP  auid  TST  tests. 

.  Numeric  values  are  generally  in  the  range  (-128.. 127).  However, 
if  necessary,  they  can  be  within  the  range  (-2048. .2047) ,  a 
maximum  of  12  bits. 

.  Tests  are  written  using  as  few  Ada  features  as  are  necessary  to 
write  a  self-checking  executable  test  that  is  not  too  difficult  to 
read  or  modify. 

To  help  ensure  a  thorough  coverage  of  the  language,  and  to  promote 
understandability  and  maintainability,  many  objectives  are  divided  into 
sub-objectives,  with  some  checked  in  a  single  test  file  and  others  checked 
in  separate  test  files.  For  example,  if  a  test  objective  is  concerned  with 
some  property  of  scalar  types,  then  individual  subtests  check: 

.  INTEGER,  CHARACTER,  BOOLEAN,  and  a  user-defined  enumeration  type, 
all  in  one  test  file  since  we  expect  all  of  these  types  to  be 
implemented. 

.  FLOAT  and  a  user-defined  floating-point  type  in  a  separate  test 
file. 

.  A  fixed-point  type  in  another  separate  test  file. 

Sub-objectives  which  are  difficult  to  test  are  also  tested  in  separate 
tests  files. 


3. 2. 2. 2  Header  Format. 

The  following  header  is  placed  at  the  beginning  of  all  new  and 
modified  tests: 

—  filename. 

—  OBJECTIVE:,. 


—  SEPARATE  FILES: 


—  APPLICABILITY  CRITERIA: 
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—  PASS/ FAIL  CRITERIA: 


—  MACRO  SUBSTITUTIONS: 


—  HISTORY: 

ccc  nun/dd/yy  comment  about  change. 


The  purpose  of  each  section  is: 

filename  -  Identical  to  the  actual  name  of  the  file. 

objective  -  describes  the  test's  objective  and  explains 

the  exact  conditions  or  sub-objectives 
presently  being  tested. 

separate  files  -  identifies  all  of  the  component  files  of  a 

multiple  file  test,  with  a  brief  description 
of  each  file. 

applicability  criteria  -  details  under  what  conditions  the  test  can  be 

ruled  inapplicable. 

pass/fail  criteria  -  explains  how  to  interpret  the  run-time 

results  for  grading  the  test. 

macro  substitution  -  identifies  the  macros  in  the  test  which  must 

be  substituted  and  a  brief  description  of 
what  the  replacement  value  represents. 

history  -  details  who  has  made  changes  to  the  test, 

when,  and  what  those  changes  were. 

The  file  name,  objective  and  history  sections  are  always  present.  The 
separate  files,  applicability  criteria,  pass/fail  criteria  and  macro 
substitutions  sections  are  present  only  for  tests  which  have  such 
conditions. 


3. 2. 2. 3  Test  Body  Format. 


Note:  test  body  refers  to  the  code  which  is  compiled/executed  and  is 
not  necessarily  synonymous  with  an  Ada  unit  body. 

The  names  of  all  library  units  correspond  to  the  name  of  the  test  to 
which  they  are  associated. 

Class  B  tests  are  generally  library  procedures.  Other  units  are  used 
when  required  by  the  objective,  in  which  case  there  is  not  necessarily  a 
main  subprogram. 
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The  main  subprogram  of  all  executable  tests  is  a  procedure.  The  name 
of  this  procedure  is  identical  to  the  name  of  the  test. 


3. 2. 2, 3.1  Test  Initialization/Reporting  And  Test  Objective  Blocks. 

The  test  body  of  an  executable  test  has  the  following  logical 
execution  sequence: 

1.  Call  to  REPORT. TEST,  which  prints  the  test  identifier  and 
description. 

2.  Elaboration  of  objective-related  declarations. 

3.  Testing  of  the  objective  -  calls  to  REPORT. FAILED  and 
REPORT. N0T_APPLI CABLE  as  appropriate. 

A.  Call  to  REPORT. RESULT,  which  prints  the  pass/fail  message. 

The  tests  generally  consist  of  a  single  procedure  with  the  objective  being 
tested  within  an  inner  DECLARE  block.  If  the  test  objective  is  divided 
into  multiple  sub-objectives,  each  sub-objective  is  tested  within  a 
separate  DECLARE  block.  For  objectives  which  require  packages  as  library 
units,  package  declarations  and  elaborations  are  arranged  to  result  in  the 
previously  described  execution  sequence. 


3. 2. 2. 3. 2  Ada  Unit  Bodies. 

The  format  of  the  statements  and  language  constructs  is  designed  to 
make  the  syntactic  and  semantic  structure  of  the  test  program  apparent.  In 
an  attempt  to  defeat  high-quality  optimizing  compilers,  which  may  execute 
or  remove  the  critical  portion  of  a  test  at  compile  time,  certain  coding 
practices  have  been  devised.  These  practices  include  calling  identity 
functions,  using  objects  in  statements  which  appear  to  have  no 
significance,  and  using  IP-THEN-ELSE  statements  instead  of  just  a  simple  IF 
statement. 


3.2.3  Macro  Substitutions. 

TST  type  tests  contain  macros  which  represent  implementation-dependent 
characteristics  of  the  language.  The  macros  are  given  as  Identifiers  which 
begin  with  a  dollar  sign  ($).  Each  macro  must  be  replaced  with  an 
appropriate  textual  value  to  make  the  tests  suitable  for  compilation. 

The  substitutions  can  be  done  automatically  by  using  the  MACROSUBS 
program  distributed  with  the  ACVC.  This  program  will  request  the 
replacement  value  for  each  macro  and  then  edit  all  the  TST  tests  in  the 
suite  to  make  the  substitution. 

Appendix  A  contains  a  description  of  all  of  the  macros  used  in  the 
test  suite. 
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3.2.4  Processing  The  ACVC  Test  Programs. 

Processing  of  the  test  suite  consists  of: 

1.  Compiling  class  B  tests. 

2.  Compiling  and  linking  class  L  tests. 

3.  Compiling,  linking,  and  executing  class  A,  C,  0,  and  E  tests. 

It  is  recommended  that  the  suite  be  processed  by  chapter.  Generally,  the 
test  suite  is  processed  within  a  single  program  library  which  must  be 
initialized  as  described  below. 

3.2.4. 1  Prerequisites. 

The  following  prerequisites  must  be  met  before  processing  the  test 
suite: 


% 
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1.  All  of  Ada  must  be  implemented  -  the  test  suite  attempts  to  cover 
the  entire  Ada  language. 

2.  The  support  package  REPORT  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Package  Report). 

3.  The  support  procedure  CHECKFILE  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Procedure  Checkfile). 

4.  The  support  package  SPPRT13  must  be  compiled  and  loaded  into  the 
program  library  (see  Package  Spprtl3). 


3. 2. 4. 2  Dependencies  Among  Tests. 

Test  files  which  use  character  position  8  (compilation  sequence)  in 
their  names  have  an  inherent  dependency.  These  test  files  must  be  compiled 
successively  and,  for  class  A,  C,  D,  E,  and  L  tests,  linked  together. 

Some  of  the  executable  file  I/O  tests  create  a  data  file  that  is  to  be 
used  by  a  subsequent  test.  In  these  instances,  the  tests  must  be  run  in 
sequence,  without  deleting  the  data  file  that  was  created.  The  tests  which 
create  such  a  file,  and  the  tests  that  depend  on  that  file  are: 

CE2108A  must  be  followed  by  CE2108B. 

CE2108C  must  be  followed  by  CE2108D. 

CE3112A  must  be  followed  by  CE3112B. 


9 


ACVC  User's  Guide  (ACVC  Version  1.10) 


3. 2. 4. 3  Test  Applicability. 

Certain  tests  in  the  suite  are  concerned  vith  optional, 
implementation-dependent  features  of  the  language.  Hence,  some  of  these 
tests  may  not  be  applicable  to  all  implementations.  The  applicability  of 
each  test  is  based  on  the  criteria  given  in  the  test  file.  The  handling  of 
tests  concerned  vith  unsupported  features  is  described  above  under  Type 
Extensions. 

For  executable  tests,  lines  containing  these  implementation-dependent 
features  are  marked  " —  NA  ->  ERROR. ".  If  an  implementation  does  not 
support  the  specified  feature,  then  these  constructs  must  be  rejected.  If 
the  constructs  so  indicated  are  rejected,  then  the  test  is  considered 
inapplicable  -  any  other  errors  reported  are  ignored.  If  the  constructs  so 
indicated  are  not  rejected,  then  the  test  remains  applicable  and  must 
execute  successfully. 

All  the  implementation-dependent  tests  are  compiled,  and  executed  if 
compiled  successfully,  during  a  validation  attempt  -  except  those  tests 
which  require  a  floating-point  DIGITS  value  that  exceeds  SYSTEM. MAX_DIGITS. 
All  results  for  a  particular  feature  must  be  consistent  (i.e.,  all  'PASSED' 
or  all  'NOT-APPLICABLE'). 

Appendix  B  contains  the  test  applicability  criteria  for  all  che 
implementation-dependent  tests. 


3. 2. 4. 4  Test  Disputes. 

The  Certification  Body  has  defined  "dispute"  to  mean: 

For  the  purposes  of  validation,  a  dispute  is  constituted  by  any 
behavior  of  the  candidate  Ada  implementation  that  is  not 
explicitly  permitted  by  the  code  of  the  ACVC  tests,  by  the 
documentation  from  the  AHO  that  accompanies  the  ACVC  tapes,  or  by 
other  documentation  provided  to  the  vendor  by  the  Ada  Validation 
Facility  (AVF). 

Disputes  must  be  brought  to  the  attention  of  the  AVF  as  soon  as  possible  so 
that  they  can  be  resolved  by  the  AVF  and  AVO.  A  dispute  related  to  a 
validation  attempt  should  be  sent  to  the  AVF  handling  the  validation. 
Other  disputes  of  ACVC  tests  can  be  sent  to  the  AMO. 


3. 2.4.5  Guidelines  For  Modifying  Tests. 

It  is  expected  that  some  tests  will  require  modifications  of  code, 
processing,  or  evaluation  in  order  to  compensate  for  legitimate 
implementation  behavior.  Modifications  are  made  with  the  approval  of  the 
AVO,  and  are  made  in  cases  where  legitimate  implementation  behavior 
prevents  the  successful  completion  of  an  (otherwise)  applicable  test. 
Examples  of  such  modifications  include: 
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.  Adding  a  length  clause  to  alter  the  default  size  of  a  collection. 

.  Creating  split  tests. 

.  Confirming  that  messages  produced  by  an  executable  test 
demonstrate  conforming  behavior  that  wasn't  anticipated  by  the 
test  (such  as  raising  one  exception  instead  of  another). 

No  original  test  can  be  modified;  copies  must  be  made.  It  is 
recommended  that  the  copies  be  named  by  appending  an  alpha-numeric 
character  to  the  <name>  portion  of  the  original  test  file.  If  possible, 
the  line  numbers  of  the  original  test  should  remain  intact. 

Split  tests  can  be  created  for  class  B  and  L  tests.  Split  tests  have 
certain  lines  commented  out  to  facilitate  catching  any  previously 
undetected  errors.  Split  tests  can  also  be  used  to  ensure  that  all  legal 
constructs  are  passed. 


3.3  Validation  Support  Tools. 

The  following  validation  tools  are  used  to  a)  provide  additional 
information  about  an  implementation,  and  b)  reduce  the  effort  required  to 
perform  a  validation  attempt. 


3.3.1  The  Ada  Validation  Assistant  Tool. 

3. 3. 1.1  Description. 

The  Ada  Validation  Assistant  Tool  (AVAT)  is  a  set  of  five  programs 
that  test  implementation-dependent  features  and  produce  lists  of  possibly 
Inapplicable  tests.  Although  it  is  not  part  of  the  test  suite,  the  AVAT 
system  can  assist  in  the  validation  process  by  providing  information  about 
the  implementation. 

AVAT  attempts  to  determine  whether  certain  features  of  the  language 
are  supported  by  the  implementation.  These  features  include  predefined 
types  other  than  those  required  by  the  language  and  certain  forms  of 
representation  clauses.  AVAT  also  attempts  to  measure  the  degree  to  which 
some  features  are  supported,  including  fixed-  and  floating-point  precision, 
and  compilation  of  generic  specifications  and  bodies  in  separate  files. 
Finally,  AVAT  reports  the  values  of  many  implementation-dependent  values, 
including  Integer  type  bounds,  real  type  accuracies  and  ranges,  and  the 
constants  declared  in  the  package  SYSTEM. 

For  the  features.-of  the  language  that  are  not  (fully)  supported,  the 
AVAT  programs  report  lists  of  ACVC  tests  that  might  be  inapplicable  due  to 
the  lack  of  (full)  support.  These  lists  may  not  be  complete;  that  is, 
there  may  be  unlisted  tests  which  are  inapplicable  due  to  an 
implementation's  lack  of  support  for  a  particular  feature.  Likewise,  the 
lists  may  not  be  entirely  accurate  for  a  particular  implementation;  that 
is,  due  to  implementation  decisions  not  anticipated  by  AVAT's  designers,  a 
test  may  be  listed  when  it  is  actually  applicable  to  the  Implementation. 
The  final  determination  of  the  applicability  of  a  test  depends  on  the 
specific  criteria  given  in  the  text  of  the  test,  the  agreement  of  test 
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results  with  the  vendor's  documentation,  and,  in  some  cases,  the  vendor's 
explanation  of  unusual  test  results.  It  is  the  vendor's  responsibility  to 
reconcile  any  inconsistencies;  for  validation  purposes,  justification  of 
inconsistencies  must  be  provided  to  the  AVP  in  the  form  of  a  test  dispute. 

Each  AVAT  program  consists  of  a  data  collection  and  reporting  package 
(common  to  the  five  AVAT  programs),  a  number  of  auxiliary  library 

procedures,  and  a  main  procedure  which  imports  the  package  and  invokes  the 
auxiliary  procedures.  Some  of  the  auxiliary  procedures  simply  provide 
section  headers  for  the  report,  and  others  provide  the  values  of 

system-defined  constants.  The  remaining  procedures  (the  majority)  are  used 
to  determine  whether  specific  language  features  are  supported.  There  are 
two  or  more  versions  of  each  such  procedure.  For  example,  the  procedure 

which  tests  for  support  of  'SIZE  clauses  for  integer  types  occurs  in  four 

versions.  The  first  version  contains  no  'SIZE  clauses;  if  it  is  executed, 
it  stores  (in  a  structure  declared  in  the  package)  a  message  that  'SIZE 
clauses  are  not  supported  for  integer  types,  and  a  list  of  kCMC  tests  that 
are  therefore  potentially  inapplicable.  The  second  version  contains  a 
'SIZE  clause  specifying  the  implementation's  default  size;  if  it  executes, 
it  stores  a  message  that  only  default  size  specifications  are  accepted,  and 
a  corresponding  list  of  potentially  inapplicable  ACVC  tests.  Likewise,  the 
third  and  fourth  versions  contain  intermediate  and  minimal  size 
specifications  and  store  corresponding  messages  and  lists  of  tests.  The 
four  versions  of  the  procedure  must  be  submitted  to  the  compiler  in  the 
given  order.  The  last  one  to  successfully  compile  will  be  the  version 
Invoked  when  the  main  program  executes;  thus  the  appropriate  message  and 
test  list  will  be  reported. 

The  AVAT  programs  are  organized  as  follows: 

COMMON  PACKAGE  DATACOLLECTION 

This  package  collects  and  reports  the  messages  and  lists  of 
potentially  inapplicable  tests. 

Specification  DATSPEC.ADA 

Body  DATBODY.ADA 

PART  ONE  AVATNUM 

This  program  reports  on  numeric  type  declarations  and 
characteristics. 

Main  procedurje  AVATNUM. ADA 

Auxiliary  procedures  AVATOOO.ADA  ..  AVAT006.ADA 

AVAT007.TST 

AVAT008.ADA  ..  AVAT012.ADA 

AVAT013.TST 

AVAT014.ADA 

AVAT015.TST 

AVAT016.ADA  ..  AVAT026.ADA 
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PART  TWO  AVATLEN 

Tnls  program  reports  on  the  support  for  length  clauses. 

Main  procedure  AVATLEN. ADA 

Auxiliary  procedures  AVATIOO.ADA  ..  AVAT134.AOA 

AVAT135.TST 

AVAT136.ADA 

AVAT137.TST 

AVAT138.ADA  AVAT154.ADA 
PART  THREE  AVATREP 

This  program  reports  on  the  support  for  enumeration  and  record 
representation  clauses  and  address  clauses.  Some  of  the 

auxiliary  procedures  in  this  program  depend  on  the  support 

package  SPPRT13. 

Main  procedure  AVATREP. ADA 

Auxiliary  procedures  AVAT200.ADA  ..  AVAT227.ADA 

PART  FOUR  AVATGEN 

This  program  reports  on  the  support  for  separate  compilation  of 
generic  specifications,  bodies,  and  subunits,  and  for  file  I/O. 

Main  procedure  AVATGEN. ADA 

Auxiliary  procedures  AVAT300.ADA  ..  AVAT335.ADA 

PART  FIVE  AVATSTD 

This  program  reports  the  values  of  constants  and  type 
characteristics  in  the  packages  STANDARD  and  SYSTEM. 

Main  procedure  AVATSTD. ADA 

Auxiliary  procedures  AVAT400.ADA  ..  AVAT411.ADA 


3. 3. 1.2  Compilation. 

The  five  programs  that  make  up  AVAT  may  be  processed  in  any  order; 
however,  the  order  of  compilation  within  each  program  is  crucial.  The 
specification  of  package  DATACOLLECTION  must  be  compiled  as  the  first  unit 
in  each  program;  the  body,  of  course,  may  be  compiled  at  any  subsequent 
time  before  the  link  step.  The  auxiliary  procedures  must  be  compiled  after 
the  package  and  before  the  main  procedure,  since  they  import  the  package 
and  the  main  procedure  imports  the  auxiliary  procedures.  It  is  especially 
important  to  note  that  the  auxiliary  procedures  must  be  compiled  in  the 
order  given  by  their  file  names,  since  the  success  of  the  programs  depends 
on  the  required  library  management.  Note  that  this  compilation  order 
requirement  prohibits  the  use  of  any  sort  of  concurrent  or  interleaved 
compilation,  including  the  use  of  batch  queues  with  more  than  one  job 
running  at  the  same  time. 
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3. 3. 1.3  Interpretation  Of  Results. 

When  the  five  AVAT  programs  execute,  they  report  the  values  of 
implementation-dependent  constants,  report  that  certain  features  are  (are 
not)  supported,  and  produce  lists  of  tests  which  are  potentially 
inapplicable  due  to  the  apparent  lack  of  support  of  certain  features.  The 
reports  should  be  read  and  carefully  considered  in  light  of  the  system 
documentation  and  known  implementation  decisions.  The  lists  of  potentially 
inapplicable  tests  serve  as  a  guide  in  determining  applicability,  but  final 
decisions  are  made  on  the  basis  of  test  behavior,  test-specific 
applicability  criteria,  and  consistency  with  documentation. 


3.3.2  Library  Support  Units. 

The  following  library  support  units  must  be  compiled  and  loaded  into 
the  program  library  that  is  used  when  compiling  and  linking  the  ACVC  tests. 


3.3.2. 1  Reporting  Test  Results. 

3. 3. 2. 1.1  Package  Report. 

All  executable  tests  use  the  REPORT  support  package.  This  package 
contains  routines  to  1)  automate  reporting  of  test  results  and  2)  help 
prevent  optimizing  out  any  test  code.  Automation  of  reporting  test  results 
is  accomplished  with  a  set  of  procedures  which  identify  the  test  and 
indicate  its  result.  Optimization  is  defeated  with  a  set  of  identity 
functions. 

Package  REPORT  uses  most  of  the  Ada  features  used  throughout  the  test 
suite,  namely: 

type  INTEGER,  literals,  +,  -,  relations,  :» 

type  CHARACTER,  literals,  &,  relations, 

type  STRING,  literals,  &,  relations, 

type  BOOLEAN,  literals,  AND,  OR,  NOT,  relations,  :> 

user-defined  enumeration  type,  literals,  relations, 

object  declarations  (and  initialization)  for  the  above  types. 

subprograim  declarations,  bodies,  and  calls,  with  formal 
parameters  of  alLmodes  and  of  the  above  types. 

IP  statements. 


Executable  tests  generally  follow  the  format: 

WITH  REPORT;  USE  REPORT; 

PROCEDURE  Testname  IS 

BEGIN 


■ 


N 

V 
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TEST  ("Testname",  "Description 

IP  ...  /-  CorrectValue  THEN 
FAILED  ("Reason"); 

END  IP; 

RESULT; 

END  Testname; 

The  specification  of  package  REPORT  is  given  in  the  file  REPSPEC.ADA. 
The  body  of  package  REPORT  is  given  in  the  file  REPBODY.ADA.  The 
specification  and  body  of  package  REPORT  are  also  given  in  Appendix  C. 

The  acceptance  tests  CZIIOIA.ADA  and  CZ1102A.A0A  must  be  compiled  and 
executed  before  a  validation  attempt  to  ensure  correct  operation  of  REPORT. 
A  listing  of  the  output  for  CZIIOIA.ADA  is  given  in  Appendix  E. 


3. 3. 2. 1.2  Allowable  Modifications  To  Package  Report. 

Since  the  body  of  package  REPORT  is  independent  of  the  tests 
themselves,  it  can  be  modified  to  use  only  those  implementation  features 
that  are  actually  working.  Modifications  made  for  a  validation  attempt 
must  be  presented  to  the  AVF. 


3. 3. 2. 2  File  I/O. 

3. 3. 2. 2.1  Procedure  CheckPile. 

Some  of  the  executable  flle-I/0  tests  (CE...  tests)  use  a  checking 
procedure  called  CHECKPILE.  CHECKPILE  is  used  to  determine  the 
implementation's  text  file  characteristics. 

The  source  code  for  this  procedure  is  found  in  the  file  CHECKPILE. ADA. 
The  body  of  procedure  CHECKPILE  is  also  given  in  Appendix  D. 

The  acceptance  test  CZ1103A.ADA  must  be  compiled  and  executed  before  a 
validation  attempt  to  ensure  correct  operation  of  CHECKPILE.  CZ1103A 
checks  that  errors  in  text  files  are  properly  detected;  therefore,  CZ1103A 
will  print  some  failure  messages  when  it  is  executed.  The  presence  of 
these  messages  does  not  mean  the  test  has  failed.  A  listing  of  the  output 
for  CZ1103A.AOA  is  given  in  Appendix  B. 


3. 3. 2. 3  Address  Clauses. 

3. 3. 2. 3.1  Package  Spprtl3. 

Package  SPPRT13  contains  functions  which  return  values  of  type 
SYSTEM. ADDRESS  for  use  in  ADDRESS  clauses.  Only  the  specification  of  this 
package  is  distributed  with  the  ACVC;  the  body  must  be  supplied  by  the 
Implementer.  Spprtl3  is  required  for  running  test  B91001H.ADA,  many 
chapter  13  tests  (CD...  tests),  and  AVAT. 


ACVC  User's  Guide  (ACVC  Version  1.10) 


3. 3. 2. 3. 2  Allowable  Hodifications  To  Package  Spprtl3. 

If  the  type  SYSTEM. ADDRESS  is  defined  to  be  static,  then  the  functions 
in  package  SPPRT13  can  be  replaced  with  constants.  Hodifications  made  for 
a  validation  attempt  must  be  presented  to  the  AVF. 


APPENDIX  A 


Macros  and  Their  Descriptions 

Following  is  the  information  contained  in  the  MACRO. OPS  file.  Eac 
macro  definition  includes: 

1.  The  macro  itself. 

2.  A  description  of  what  the  replacement  value  represents. 

3.  A  list  of  tests  which  depend  on  the  macro. 

4.  An  example  replacement  value. 


—  $MAX  IN  LEN 

—  AN  INTEGER  LITERAL  GIVING  THE  MAXIMUM  LENGTH  PERMITTED  BY  THE 

—  COMPILER  FOR  A  LINE  OF  ADA  SOURCE  CODE  (NOT  INCLUDING  AN  END-OF-LINE 

—  CHARACTER). 

—  USED  IN;  A26007A 

MAX  IN  LEN  60 


—  $BIG  IDl 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OP  CHARACTERS  IS  $MAX  IN  LEN. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003D  B23003E  C23D03G 

C23003H  C23003I  C23003J  C35502D  C35502F 


BIG  IDl 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAAl 


—  $BIG  ID2 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN_LEN, 

—  DIFFERING  FROM  $BIG  IDl  ONLY  IN  THE  LAST  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003P  C23003G  C23003H 

C23003I  C23003J 


BIG  ID2 


AAAAAAAAA  AAAAAAAAA  AAaAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA2 
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—  $BIG  ID3 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OP  CHARACTERS  IS  $MAX_IN  LEN. 

—  USED  IN;  C23003A  C23003B  C23003C  C23003G  C23003H  C23C03I 

C23003J 


BIG  ID3 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA3AAAAAAAAA  AAAAAAAAA  AAAAAAAAAA 


—  $BIG_IDA 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN_LEN, 

—  DIFFERING  FROM  $BIG_ID3  ONLY  IN  THE  MIDDLE  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  C23003G  C23003H  C23003I 

C23003J 


BIG  IDA 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAAAAAAAAAAAA  AAAAAAAAA  AAAAAAAAAA 


—  $BIG  STRINGl 

—  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG_STRING2 

—  ($BIG_STRING1  &  $BIG  STRING2)  PRODUCES  THE  IMAGE  OP  $BIG_ID1. 

—  USED  IN:  C35502D  c55502P 

BIGSTRINGl  "AAAAAAAAA_AAAAAAAAA_AAAAAAAAA_" 

—  SBIG  STRING2 

—  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG_STRING1 

—  ($BIG_STRING1  &  SBIG  STRING2)  PRODUCES  THE  IMAGE  OF  SBIGIDl. 

—  USED  IN:  C35502D  C35502P 

BIG_STRING2  "AAAAAAAAA_AAAAAAAAA_AAAAAAAAA1" 

—  $MAX  STRING  LITERAL 

—  A  STRING  literal  CONSISTING  OP  $MAX_IN_LEN  CHARACTERS  (INCLUDING  THE 

—  QUOTE  CHARACTERS). 

—  USED  IN:  A26007A 
MAX  STRING_LITERAL 

^CCCCCCC10CCCCCCCC20CCCCCCCC30CCCCCCCC40CCCCCCCC50CCCCCCCC59" 


—  $NEG  BASED  INT 

—  A  BASED_INTEGER  LITERAL  (PREFERABLY  BASE  8  OR  16)  WHOSE  HIGHEST  ORDER 

—  NON-ZERO  BIT  WOULD  FALL  IN  THE  SIGN  BIT  POSITION  OP  THE 

—  REPRESENTATION  FOR  SYSTEM. MAX  INT,  I.E.,  AN  ATTEMPT  TO  WRITE  A 

—  NEGATIVE  VALUED  LITERAL  SUCH  AS  -2  BY  TAKING  ADVANTAGE  OF  THE 

—  BIT  REPRESENTATION. 

—  USED  IN;  E24201A 

NEG_BASED_INT  16#FPPPFPFE# 

SBIG  INT  LIT 

—  AN  integer  LITERAL.WHOSE  VALUE  IS  298,  BUT  WHICH  HAS 

—  (SMAX_IN  LEN  -  3)  LEADING  ZEROES. 

—  USED  IN:~  C24003A 
BIG  INT  LIT 

“  000000000000000000000000000000000000000000000000000000000 298 
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$BIG_REAL_LIT 

—  A  UNIVERSAL_REAL  LITERAL  VHOSE  VALUE  IS  690.0,  BUT  WHICH  HAS 

—  ($MAX_IN_LEN  -  5)  LEADING  ZEROES. 

—  USED  IN:  C24003B  C24003C 

BIG_REAL_LIT 

0000000000000000000000000000000000000000000000000000000690 . 0 

—  $MAX_LEN  INT_BASED_LITERAL 

—  A  BASED  INTEGER  LITERAL  (USING  COLONS)  WHOSE  VALUE  IS  2:11:,  HAVING 

—  ($MAX_IN_LEN  -  5)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  FIRST  1. 

—  USED  IN:  C2A009A 
MAX_LEN  INT  BASED  LITERAL 

2 : 0?5000500000000000000000000000000000000000000000000000001 1 ; 

—  $MAX  LEN_REAL_BASED_LITERAL 

—  A  BASED  REAL  LITERAL  (USING  COLONS)  WHOSE  VALUE  IS  16:F.E:,  HAVING 

—  ($MAX_IN_LEN  -  7)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  F. 

—  USED  IN:  C2A009A 

MAX  LEN  REAL  BASED  LITERAL 

T6 : o5OOOO0OOOOO0OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOF . E ; 

—  SBLANKS 

—  A  SEQUENCE  OF  ($MAX_IN  LEN  -  20)  BLANKS. 

—  USED  IN:  B22001A  B22501B  B22001C  B22001D  B22001E  B22001F 

B22001G  B22001I  B22001J  B22001K  B22001L  B22001M 

B22001N 

<  LIMITS  OF  SAMPLE  SHOWN  BY  ANGLE  BRACKETS  > 

BLANKS 

—  $MAX  DIGITS 

—  AN  ifiTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX  DIGITS. 

—  USED  IN:  B35701A  CD7102B 

MAX__DIGITS  6 

—  $NAME 

—  THE  NAME  OF  A  PREDEFINED  INTEGER  TYPE  OTHER  THAN  INTEGER, 

—  SHORT_INTEGER,  OR  LONG_INTEGER . 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USB  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCH_TYPE  AVAILABLE.) 

—  USED  IN:  AVAT007  C45251D  B8600TX 
NAME  TINY_INTEGER 

—  SFLOATNAMB 

—  THE  NAME  OF  A  PREDEFINED  FLOATING  POINT  TYPE  OTHER  THAN  FLOAT, 

—  SHORTFLOAT,  OR  LONG  FLOAT.  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH 

—  TYPES  SHOULD  USE  AN  UNDEFINED  IDENTIFIER  SUCH  AS  N0_SUCH_TYPE. ) 

—  USED  IN:  AVAT013  B86001Y 

FLOAT  NAME  SHORT  SHORT  FLOAT 


A-3 


Macros  and  Their  Descriptions 


—  $FIXED_NAME 

—  THE  NAME  OF  A  PREDEFINED  FIXED  POINT  TYPE  OTHER  THAN  DURATION. 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USE  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCH_TYPE.) 

—  USED  IN:  AVAT030  BSSOOlZ 

FIXED_NAME  NO_SUCH_FIXED_TYPE 

—  $INTEGER_FIRST 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  INTEGER' FIRST. 

—  USED  IN:  C35503F  B54B01B 

INTEGER_FIRST  -32_768 

—  $INTEGER_LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST. 

—  USED  IN:  C35503F  B45232A  B45B01B 

INTEGER_LAST  32_767 

—  $INTEGER_LAST_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST  +  1. 

—  USED  IN:  C45232A 
INTEGER_LAST_PLUS_1  32_768 

—  $MIN_INT 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  SYSTEM. MIN  INT. 

—  THE  LITERAL  MUST  NOT  CONTAIN  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  CD7101B 

MIN_INT  -2147483648 

—  $MAX_INT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX  INT. 

—  THE  LITERAL  MUST  NOT  INCLUDE  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  C4A007A  CD7101B 

MAX_INT  2147483647 

—  $MAX_INT_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX  INT  +  1 . 

—  USED  IN:  C45232A 

MAX_INT_PLUS_1  2_147_483_648 

—  $LESS_THAN_DURATION 

—  A  REAL  LITERAL  (WITH  SIGN)  WHOSE  VALUE  (NOT  SUBJECT  TO 

—  ROUND-OFF  ERROR  IF-POSSIBLB)  LIES  BETWEEN  DURATION' BASE' FIRST  AND 

—  DURATION' FIRST.  IF  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN 

—  DURATION' RANGE. 

—  USED  IN:  C96005B 

LESS  THAN  DURATION  -75  000.0 
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—  $GREATER_THAN_DURATION 

—A  REAL  LITERAL  WHOSE  VALUE  (NOT  SUBJECT  TO  ROUND-OFF  ERROR 

—  IF  POSSIBLE)  LIES  BETWEEN  DURATION' BASE' LAST  AND  DURATION' LAST.  IF 

—  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN  DURATION' RANGE. 

—  USED  IN;  C96005B 

GREATER_THAN_DURATION  75_000 . 0 

—  $LESS_THAN_DURATION_BASE  FIRST 

—  A  REAL  LITERAL  (WITH  SIGN)  WHOSE  VALUE  IS  LESS  THAN 

—  DURATION' BASE' FIRST. 

—  USED  IN:  C96005C 

LESS_THAN_DURATION_BASE_FIRST  -131_073.0 

—  $GREATER_THAN_DURATION_BASE  UST 

—  A  REAL  LITERAL  WHOSE  VALUE  IS  GREATER  THAN  DURATION' BASE' LAST. 

—  USED  IN:  C96005C 

GREATER_THAN_DURATION_BASE_LAST  131_073 . 0 

—  $COUNT  LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  TEXT_IO. COUNT' LAST. 

—  USED  IN;  CE3002B 

COUNT_LAST  32_767 

—  $FIELD  LAST 

—  AN  INTgGER  LITERAL  WHOSE  VALUE  IS  TEXT_IO. FIELD' LAST. 

—  USED  IN:  CE3002C 

FIELD_LAST  32_767 

—  SILLEGAL  EXTERNAL  FILE_NAMB1 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME  (E.G.,  TOO  LONG,  CONTAINING  INVALID 

—  CHARACTERS,  CONTAINING  WILD-CARD  CHARACTERS,  OR  SPECIFYING  A 

—  NONEXISTENT  DIRECTORY). 

—  USED  IN:  CE2103A  CE2102C  CE2102H  CE2103B  CE3102B  CE3107A 

ILLEGAL_EXTERNAL_FILE_NAME1  \NODIRECTORY\ FILENAME 

—  $ILLEGAL_EXTERNAL  FILE_NAME2 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME,  DIFFERENT  FROM  $EXTERNAL_FILE_NAME1 . 

—  USED  IN:  CE2102C  CE2102H  CE2103A  CE2103B 

ILLEGAL_EXTERNAL_FILE_NAME2  THIS-FILE-NAME-IS-TOO-LONG-FOR-MY-SYSTEM 

—  $ACC_SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  MINIMUM  NUMBER  OF  BITS 

—  SUFFICIENT  TO  HOLD  ANY  VALUE  OF  AN  ACCESS  TYPE. 

—  USED  IN:  CD1C03C  CD2A81A  CD2A81B  CD2A81C  CD2A81D  CD2A81E 

CD2A81P  CD2A81G  CD2A83A  CD2A83B  CD2A83C  CD2A83E 

CD2A83P  CD2A83G  ED2A86A  CD2A87A 

ACC  SIZE  32 
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Macros  and  Their  Descriptions 


—  $TASK_SIZE 

—  AN  INTEGER  LITERAL  VHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  A  SINGLE  ENTRY  WITH  ONE  INOUT  PARAMETER. 

—  USED  IN:  CD2A91A  CD2A91B  CD2A91C  CD2A91D  CD2A91E 

TASK_SIZE  128 

—  $MIN_TASK_SIZE 

-  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  NO  ENTRIES,  NO  DECLARATIONS,  AND  "NULL;" 

—  AS  THE  ONLY  STATEMENT  IN  ITS  BODY. 

—  USED  IN;  CD2A95A 

MIN_TASK_SIZE  64 

—  $NAME_LIST 

—  A  LIST  OF  THE  ENUMERATION  LITERALS  IN  THE  TYPE  SYSTEM. NAME,  SEPARATED 

—  BY  COMMAS. 

—  USED  IN:  CD7003A 

NAME_LIST  OUR_VMS_ADA,  OUR_^ULTRIX_ADA,  OUR_ELN_ADA 

—  SDEFAULT  SYS_NAME 

—  THE  VALUE  OP  THE  CONSTANT  SYSTEM. SYSTEM_NAME. 

—  USED  IN:  CD7004A  CD7004C  CD7004D 

DEFAULT_SYS_NAME  OUR_VMS_ADA 

—  $NEW  SYS_NAME 

—  A  VALUE  OF  THE  TYPE  SYSTEM. NAME,  OTHER  THAN  $DEFAULT_SYS  NAME.  IF 

—  THERE  IS  ONLY  ONE  VALUE  OF  THE  TYPE,  THEN  USE  THAT  VALUE? 

—  NOTE:  IF  THERE  ARE  MORE  THAN  TWO  VALUES  OF  THE  TYPE,  THEN  THE 

PERTINENT  TESTS  ARE  TO  BE  RUN  ONCE  FOR  EACH  ALTERNATIVE. 

—  USED  IN:  ED7004B1 

NEW_SYS_NAME  OUR_ULTRIX_ADA 

—  $DEFAULT_STOR  UNIT 

—  AN  INTEGER  LITERAL  VHOSE  VALUE  IS  SYSTEM . STORAGE_UNIT . 

—  USED  IN:  CD7005B  ED7005D3M  CD7005E 

DEFAULT_STOR_UNIT  16 

—  $NEW_STOR  UNIT 

—  AN  INTEGER  LITERAL  VHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  STORAGE_UNIT,  OTHER  THAN  $DEFAULT_STOR_UNIT.  IF  THERE 

—  IS  NO  OTHER  PERMITTED  VALUE,  THEN  USE  THE  VALUE  OF 

—  $SYSTEM.STORAGB_UNIT.  IF  THERE  IS  MORE  THAN  ONE  ALTERNATIVE, 

—  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR  EACH  ALTERNATIVE. 

—  USED  IN:  ED7005C1  ED7005D1  CD7005E 

NEW_STOR_UNIT 

—  $DEPAULT_MEM_SIZE 

—  AN  INTEGER  LITERAL  VHOSE  VALUE  IS  SYSTEM. MEMORY_SIZE. 

—  USED  IN;  CD7006B  ED7006D3M  CD7006E 

DEFAULT  MEM  SIZE  655  360 


Macros  and  Their  Descriptions 


—  $NEW_MEM  SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  MEMORY  SIZE,  OTHER  THAN  $DEFAULT_MEM_SIZE.  IF  THERE  IS  NO 

—  OTHER  VALUE,  THEN  USE  $DEFAULT  MEM_SIZE.  IF  THERE  IS  MORE  THAN 

—  ONE  ALTERNATIVE,  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR 

—  EACH  ALTERNATIVE.  IF  THE  NUMBER  OF  PERMITTED  VALUES  IS  LARGE,  THEN 

—  SEVERAL  VALUES  SHOULD  BE  USED,  COVERING  A  WIDE  RANGE  OP 

—  POSSIBILITIES. 

—  USED  IN:  ED7006C1  ED7006D1  CD7006E 

NEW_MEM_SIZE  1_048_576 

—  $LOW_PRIORITY 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  LOWER  BOUND  OP  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

LOWPRIORITY  0 

—  $HIGH_PRIORITY 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  UPPER  BOUND  OP  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

HIGH_PRIORITY  3 

—  $MANTISSA  DOC 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX  MANTISSA  AS  SPECIFIED 

—  IN  THE  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN;  CD7013B 

MANTISSA_DOC  31 

_  $DELTA  DOC 

—  A  REAL“LITERAL  whose  value  is  SYSTEM. FINE_DELTA  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7013D 

DELTA_DOC  0.000_000_000_465_661_287_307_739_558_602_5 

—  STICK 

—  A  REAL  LITERAL  WHOSE  VALUE  IS  SYSTEM. TICK  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7104B 
TICK  0.001 
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Test  Applicability  Criteria 


Certain  tests  in  the  suite  may  be  considered  inapplicable  to  an 
implementation  depending  on  the  way  the  implementation  treats  the 
implementation-dependent  features  of  the  language.  A  brief  summary  of 
these  implementation-dependent  features  and  the  tests  they  affect  are 
listed  in  this  appendix. 

Note  that  the  applicability  of  each  one  of  these  tests  is  based  on  the 
criteria  listed  in  the  test  file.  All  potentially  inapplicable  tests  must 
still  be  compiled  -  except  those  tests  which  require  a  floating-point 
DIGITS  value  that  exceeds  SYSTEM. HAX_DIGITS  -  and  executed  if  successfully 
compiled,  to  verify  the  implementation's  treatment  of  these  features.  All 
results  for  a  particular  feature  must  be  consistent. 

The  first  part  of  this  appendix  is  concerned  with  tests  for  which  the 
applicability  is  determined  at  compile  time.  Class  B  tests  that  are 
inapplicable  should  be  successfully  compiled.  Executable  test  that  are 
inapplicable  must  be  rejected  at  compile  time  as  a  result  of  the 
unsupported  feature.  Lines  containing  the  implementation-dependent 
features  are  marked  " —  NA  >>  ERROR.". 


If  the  type  SHORT_INTEGER  is  not  predefined,  then  the  following  tests 
are  inapplicable: 

B52004E.DEP  B55B09D.DEP  B86001V.DBP 
C45231B.DEP  C4530AB.DEP  C45502B.DBP 
C45503B.DEP  C45504B.DEP  C45504E.DBP 
C45611B.DBP./,  C45613B.DEP  C45614B.DBP 
C45631B.DBP  C45632B.DEP  C55B07B.DBP 
CD7101B.DEP 
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Cofflpile  Time  Inapplicability 


If  the  type  LONG_INTEGER  is  not  predefined,  then  the  following  tests 
are  inapplicable: 


B52004D.DEP 

C45231C.DEP 

C45503C.DEP 

C45611C.DEP 

C45631C.DEP 

CD7101F,DEP 


B55B09C.DEP 

C45304C.DEP 

C45504C.DEP 

C45613C.DEP 

C45632C.DEP 


B86001W.DEP 

C45502C.DEP 

C45504F.DEP 

C45614C.DEP 

C55B07A.DEP 


If  the  type  SHORT_FLOAT  is  not  predefined,  then  the  following  tests 
are  Inapplicable: 

B86001T.DEP  C35702A.DEP 


If  the  type  L0NG_FL0AT  is  not  predefined,  then  the  following  tests  are 
inapplicable: 

B86001U.DEP  C35702B.DEP 


If  there  are  no  predefined  Integer  types  other  than  INTEGER, 
SHORT  INTEGER,  and  LONG  INTEGER,  then  the  following  tests  are 
inapplicable:  " 

B86001X.TST  C45231D.TST  CD7101G.TST 


If  there  are  no  predefined  floating-point  types  other  than  FLOAT, 
SHORT_FLOAT,  and  L0NG_FL0AT,  then  the  following  test  is  inapplicable: 

B86001Z.TST 


If  there  are  no  predefined  fixed-point  types,  then  the  following  test 
is  inapplicable: 

B86001Y.TST 


If  'SIZE  representation  clauses  for  boolean  types  are  not  supported, 
then  the  following^  tests  are  inapplicable: 

CD2A64A.DEP  CD2A64C.DEP  CD2A65A.DEP 

CD2A65C.DEP  CD2A74A.DEP  CD2A76A.DEP 
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Compile  Time  Inapplicability 


:S 

If  'SIZE  representation  clauses 

for  enumeration 

ii- 

1 

supported,  then  ' 

the  folloving  tests 

are  inapplicable: 

A39005B.DEP 

CD1009B.DEP 

CD1009P.DEP 

CD2A21A.DEP 

CD2A21B.DEP 

CD2A21C.DEP 

f;. 

CD2A21D.DEP 

CD2A21E.DEP 

CD2A22A.DEP 

CD2A22B.DEP 

CD2A22C.DEP 

CD2A220.DEP 

1 

CD2A22E.DEP 

CD2A22F.DEP 

CD2A22G.0EP 

C02A22H.DEP 

CD2A23A.DEP 

CD2A22I.DEP 

CD2A23B.DEP 

CD2A22J.DEP 

CD2A23C.DEP 

i 

CD2A23D.DEP 

CD2A23E.DEP 

CD2A24A.DEP 

CD2A24B.DEP 

CD2A24C.DEP 

CD2A24D.DEP 

C02A24E.DBP 

CD2A24F.DEP 

CD2A24G.DEP 

CD2A24H.DEP 

CD2A24I.DEP 

CD2A24J.DEP 

CD2A66B.DEP 

CD2A66D.DEP 

ED2A26A.0BP 

l£  'SIZE  representation  clauses  for  integer  types  are 
then  the  folloving  tests  are  inapplicable: 


not  supported, 


C87B62A.DEP 

CD1C03A.DEP 

CD2A31B.DEP 

CD2A32A.DEP 

CD2A32D.DEP 

CD2A32G.DEP 

CD2A32J.DEP 

CD2A65B.DEP 

CD2A76B.DEP 


CD1009A.DEP 

CD1C04A.DBP 

CD2A31C.DEP 

CD2A32B.DEP 

CD2A32E.DEP 

CD2A32H.DEP 

CD2A64B.DEP 

CD2A65D.DEP 


CD10090.DEP 

CD2A31A.DEP 

CD2A31D.DEP 

CD2A32C.DEP 

CD2A32F.DEP 

CD2A32I.DEP 

CD2A64D.DBP 

CD2A74B.DEP 


If  'SIZE  representation  clauses  for  floating-point 
supported,  then  the  folloving  tests  are  inapplicable: 


types  are  not 


CD1009C.DEP 

CD2A41C.DEP 

CD2A42A,DEP 

CD2A42D.DEP 

CD2A42G.DEP 

CD2A42J.DEP 


CD2A41A.DEP 

CD2A41D.DEP 

CD2A42B.0EP 

CD2A42E.DEP 

CD2A42H.DEP 


CD2A41B.DEP 

CD2A41E.DEP 

CD2A42C.DBP 

CD2A42F.DEP 

CD2A42I.DEP 
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Compile  Time  Inapplicability 


If  'SIZE  representation  clauses  for  fixed-point  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

CD1009D.DEP  CD1009Q.DEP  CD1C04C.DEP 
CD2A51B.DEP  CD2A51C.DEP  CD2A51D.DEP 
CD2A51E.DEP  CD2A52A.DEP  CD2A52B.DEP 
CD2A52C.DEP  CD2A52D.DEP  CD2A52G.DEP 
CD2A52H.DEP  CD2A52I.DEP  CD2A52J.DEP 
CD2A53A.DEP  CD2A53B.DEP  CD2A53C.DBP 
CD2A530.DBP  C02A53E.DEP  CD2A54A.0EP 
CD2A54B.DEP  CD2A54C.DEP  CD2A34D.0BP 
CD2A54G.DBP  CD2A54H.DEP  CD2A54I.DEP 
CD2A54J.DEP  ED2A56A.DEP 


If  'SIZE  representation  clauses  for  array  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

CD1009E.DEP  CD1009P.DEP  CD2A61A.DEP 
CD2A61B.DEP  CD2A61C.DEP  CD2A61D.DEP 
C02A61E.DEP  CD2A61F.DEP  CD2A61G.DBP 
CD2A61H.DEP  C02A61I.DEP  CD2A61J.DEP 
CD2A61K.OBP  CD2A61L.DEP  CD2A62A.OEP 
CD2A62B.DEP  CD2A62C.DEP  CD2A62D.DEP 
C02A63A.DEP  C02A63B.DEP  C02A63C.DBP 
C02A63D.0EP  CD2A64A.0EP  CD2A64B.OEP 
CD2A64C.DEP  CD2A64D.DEP  CD2A65A.DEP 
CD2A65B.DEP  CD2A65C.DEP  CD2A65D.DEP 
CD2A66A.DEP  CD2A66B.DEP  CD2A66C.DEP 
C02A660.DEP 


If  'SIZE  representation  clauses  for  record  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

CD1009G.DEP  CD2A71A,DEP  CD2A71B.DEP 
CD2A71C.DEP  CD2A71D.DEP  CD2A72A.DEP 
CD2A72B.DEP  CD2A72C.DEP  CD2A72D.DEP 
CD2A73A.DEP  CD2A73B.DEP  CD2A73C.DEP 
CD2A73D.DEP  CD2A74A.DEP  CD2A74B.DEP 
CD2A74C.DBP  CD2A74D.DEP  CD2A75A.DEP 
CD2A75B.DEP  CD2A75C.DEP  CD2A75D.DEP 
CD2A76A.DEP  CD2A76B.DEP  CD2A76C.DEP 
CD2A76D.OEP 


If  'SIZE  representation  clauses  for  private  types  are  not  supported, 
then  the  following  test  is  Inapplicable: 

CD1009H.DEP 
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Compile  Time  Inapplicability 


If  'SIZE  representation  clauses  for  limited  private  types  are  not 
supported,  then  the  following  test  is  inapplicable: 

CD1009I . DEP 


If  'SIZE  representation  clauses  for  access  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

CD2A81A.TST  CD2A81B.TST  CD2A81C.TST 
CD2A81D.TST  CD2A81E.TST  CD2A81F.TST 
CD2A81G.TST  CD2A83A.TST  CD2A83B.TST 
CD2A83C.TST  CD2A83E.TST  CD2A83P.TST 
CD2A83G.TST  CD2A84A.DEP  CD2A84B.DBP 
CD2A84C.DEP  CD2A84D.DEP  CD2A84B.DEP 
CD2A84F.DEP  C02A84G.DEP  CD2A84H.DEP 
CD2A84I.DEP  CD2A84K.DEP  CD2A84L.DEP 
CD2A84M.DEP  CD2A84N.DEP  CD2A87A.TST 
ED2A86A.TST 


If  'SIZE  representation  clauses  for  task  types  are  not  supported,  then 
the  following  tests  are  inapplicable: 

CD2A91A.TST  CD2A91B.TST  CD2A91C.TST 

CD2A91D.TST  CD2A91E.TST 


If  ' STORAGE_SIZE  representation  clauses  for  access  types  are  not 
supported.  Then  the  following  tests  are  inapplicable: 

A39005C.DEP  C87B62B.DEP  CD1009J.DEP 
CD1009R.DEP  CD1009S.DEP  CD1C03C.TST 
CD2A83A.TST  CD2A83B.TST  CD2A83C.TST 
CD2A83E.TST  CD2A83F.TST  CD2A83G.TST 
CD2A84A.DEP  CD2A84B.OEP  CD2A84C.DEP 
CD2A84D.DEP  CD2A84E.DEP  CD2A84F.DEP 
CD2A84G.0EP  CD2A84H.0EP  C02A84I.DEP 
CD2A84K.DEP  CD2A84L.DEP  CD2A84M.DEP 
CD2A84N.DEP  CD2B11A.DEP  CD2B11B.DEP 
CD2B11C.DEP  CD2B11D.DEP  CD2B11E.DEP 
CD2B11P.DEP  CD2B11G.DEP  CD2B15B.DEP 
CD2B15C.DEP  CD2B16A.DEP  CD7205C.DEP 
ED2A86A.TST 


If  'STORAGE  SIZE  representation  clauses  for  task  types  are  not 
supported,  tHen  the  following  tests  are  inapplicable: 

A39005D.DEP  C87B62D.DEP  CD1009K.DEP 
CD1009T.DEP  CD1009U.DEP  CD1C03E.DEP 
CD1C04B.DEP  CD1C06A.DEP  CD7205D.DEP 


Compile  Time  Inapplicability 


If  the  'SMALL  clause  is  not  supported,  then  the  following  tests  are 
inapplicable: 

A39005E.DEP  C87B62C.DEP  CD1009L.DEP 
CD1C03P.DEP  CD2A53A.DEP  CD2A53B.DEP 
CD2A53C.DEP  CD2A53D.DEP  CD2A53E.DEP 
CD2A34A.DEP  CD2A54B.DEP  CO2A54C.0EP 
CD2A54D.DEP  CD2A54G.DEP  CD2A54H.DEP 
CD2A54I.DEP  CD2A54J.DEP  CD2D11A.DEP 
C02011B.DEP  CD2D13A.DEP  ED2A56A.0BP 


If  enumeration  representation  clauses  are  not  supported,  then  the 
following  tests  are  inapplicable: 

AD1009M.DEP  AD1009V.DEP  AD1009W.DEP 
AD1C04D.DEP  C35502N.DEP  C35507I.DEP 
C35507J.DEP  C35507H.DBP  C35507N.DEP 
C35508J.DEP  CD1C03G.DEP  CD2A23A.DEP 
CD2A23B.DEP  CD2A23C.DEP  CD2A23D.DEP 
C02A23E.DEP  CD2A24A.DEP  CD2A24B.DBP 
CD2A24C.DEP  CD2A24D.DEP  CD2A24B.DBP 
CD2A24P.DEP  CD2A24G.DBP  CD2A24B.0EP 
CD2A24I.DEP  CD2A24J.DEP  CD3021A.DEP 
E02A26A.0EP 


If  enumeration  representation  clauses  for  non-con tiguous  values  are 
not  supported,  then  the  following  tests  are  inapplicable: 

A39005P.DEP  C35502I.DEP  C35502J.DEP 
C35502M.DEP  C35502N.DBP  C35507J.DEP 
C35507M.DEP  C35507N.DEP  C35508I.DEP 
C35508J.DEP  C35508M.DEP  C35508N.DEP 
C55B16A.DEP 


If  enumeration  represf station  clauses  for  types  other  than  character 
and  boolean  are  not  supported,  then  the  following  tests  are 
inapplicable: 

A39005P.DEP  C35502I.DEP  C35502J.DEP 
C35502H.DEP  C35502N.DEP 


If  enumeration  representation  clauses  for  character  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

C35507I.DEP  C35507J.DEP  C35507M.DEP 

C35507N.DEP  C55B16A.DEP 


Compile  Time  Inapplicability 


If  enumeration  representation  clauses  for  boolean  types,  with 
representation  values  other  than  (FALSE  «>  0,  TRUE  ■>!),  are  not 
supported,  then  the  following  tests  are  inapplicable: 

C35508I.DEP  C35508J.DEP  C35508M.DEP 
C35508N.DEP 


If  record  representation  clauses  are  not  supported,  then  the  following 
tests  are  inapplicable: 

A39005G.DEP  CD1009N.DEP  CD1009X.DEP 
CD1009Y.DEP  CD1009Z.DBP  CD1C03H.DEP 
CD1C04E.DEP  CD4031A.DEP  CD4051A.DEP 
CD4051B.DEP  CD4051C.DEP  CD7204C.DEP 
ED1D04A.DEP 


If  'ADDRESS  clauses  for  variables  are  not  supported,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5003B.DEP  CD5003C.DEP  CD5003D.DBP 
CD5003E.DEP  CD5003F.DEP  CD5003G.DBP 
CD5003H.DEP  CD5003I.DEP  CD5011A.DEP 
CD5011C.DEP  CD5011E.DEP  CD5011G.DEP 
CD5011I.DEP  CD5011K.DEP  CD5011M.DEP 
CD50110.DEP  CD5011Q.DEP  CD5012A.DEP 
CD5012B.DEP  CD5012E.DEP  CD5012F.DBP 
CD5012I.DEP  CD5012J.DEP  CD5012M.DEP 
CD5013A.DEP  CD5013C.DEP  CD5013E.DEP 
CD5013G.DEP  CD5013I.DEP  CD5013K.DEP 
CD5013M.DEP  CD50130.DEP  CD5013S.DEP 
CD5014A.DEP  CD5014C.DEP  CD5014E.DEP 
CD5014G.DEP  CD5014I.DEP  CD5014K.DEP 
CD5014M.DEP  CD50140.DEP  CD5014S.DEP 
CD5014T.DEP  CD5014V.DEP  CD5014X.DEP 
CD5014Y.DEP  CD5014Z.DEP 


Compile  Time  Inapplicability 


If  'ADDRESS  clauses  for  constants  are  not  supported,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5011B.DEP  CD5011D.DEP  CD5011F.DEP 
CD5011H.DEP  CD5011L.DEP  CD5011N.DEP 
CD5011R.DEP  CD5011S.DEP  CD5012C.DEP 
CD5012D.DEP  CD5012G.DEP  CD5012H.DEP 
CD5012L.DEP  CD5013B.DEP  CD5013D.DEP 
CD5013F.DEP  CD5013H.DEP  CD5013J.DEP 
CD5013L.DEP  CD5013N.DEP  CD5013R.DBP 
CD5014B.DEP  CD5014D.DEP  CD5014F.DEP 
CD5014H.DEP  CD5014J.DEP  CD5014L.DEP 
CD5014N.DEP  CD5014R.DEP  CD5014U.DEP 
CD5014V.DEP 


If  'ADDRESS  clauses  for  subprograms  are  not  supported  ,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5007B.DEP 


If  the  pragmas  SYSTEMMAME,  STORAGEUMIT,  and  MEMORYSIZE  must  come  at 
the  beginning  of  a  program  library,  then  the  following  files  are 
ommitted  from  the  associated  test: 

ED7004B0.TST  ED7004B2.TST 
ED7005C0.TST  ED7005C2.TST 
ED7005DO.TST  ED7005D2.TST 
ED7006C0.TST  ED7006C2.TST 
ED7006D0.TST  ED7006D2.TST 


If  any  limitations,  other  than  those  specified  in  the  RM,  are  imposed 
on  the  use  of  the  pragmas  SYSTEMNAME,  STORAGEUNIT,  and  MEMORYSIZE, 
then  the  following  test  may  be  inapplicable: 

CD7004C.TST  CD7005E.TST  CD7006E.TST 


Consider  the  following  declarations: 

TYPE  F  IS  DIGITS  SYSTEM. MAXDIGITS; 

N  ;  CONSTANT  :-  2.0  *  F'MACHINERADIX  **  F'MACBINEEMAX; 

'  J  ^  ' 

If  the  declaration  of  N  is  rejected  on  the  grounds  that  evaluation  of 
the  expression  will  raise  an  exception,  then  the  following  test  is 
inapplicable: 

C4A013B.ADA 


B-8 


Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**10  ..  2. 0**10  -  0.5 
DELTA  1.0  RANGE  -2. 0**11  ..  2. 0**11  -  1.0 
DELTA  2. 0**10  RANGE  -2. 0**21  ..  2. 0**21  -  2. 0**10 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531C.DEP  C45531D.DEP  C45532C.DEP 

C45532D.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**14  ..  2. 0**14  -  0.5 
DELTA  1.0  RANGE  -2. 0**15  ..  2. 0**15  -  1.0 
DELTA  2. 0**14  RANGE  -2. 0**29  ..  2. 0**29  -  2. 0**14 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531G.DEP  C45531H.DEP  C45532G.DEP 

C45532H.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**30  ..  2. 0**30  -  0.5 
DELTA  1.0  RANGE  -2. 0**31  ..  2. 0**31  -  1.0 
DELTA  2. 0**30  RANGE  -2. 0**61  ..  2. 0**61  -  2. 0**30 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531K.DEP  C45531L.DEP  C45532K.DEP 

C45532L.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**46  ..  2. 0**46  -  0.5 
DELTA  1.0  RANGE  -2. 0**47  ..  2. 0**47  -  1.0 
DELTA  2. 0**46  RANGE  -2, 0**93  ..  2. 0**93  -  2. 0**46 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C455310.DEP  '  C45531P.DEP  C455320.DEP 

C45532P.DEP 
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Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  2.0**-12  RANGE  -0.5  ..  0.5  -  2.0**-12 

DELTA  2.0**-ll  RANGE  -1.0  ..  1.0  -  2.0**-ll 

DELTA  2.0**-10  RANGE  -2.0  ..  2.0  -  2.0**-10 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531A.DEP  C45531B.DEP  C45532A.DEP 

C45532B.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-16  RANGE  -0.5  ..  0.5  -  2.0**-16 

DELTA  2.0**-15  RANGE  -1.0  ..  1.0  -  2.0**-15 

DELTA  2.0**-14  RANGE  -2.0  ..  2.0  -  2.0**-14 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531E.DEP  C45531F.DEP  C45532E.DEP 

C45532P.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-32  RANGE  -0.5  ..  0.5  -  2.0**-32 

DELTA  2.0**-31  RANGE  -1.0  ..  1.0  -  2.0**-31 

DELTA  2.0**-30  RANGE  -2.0  ..  2.0  -  2.0**-30 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531I.DEP  C45531J.DEP  C45532I.DEP 

C45532J.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-48  RANGE  -0.5  ..  0.5  -  2.0**-48 

DELTA  2.0**-47  RANGE  -1.0  ..  1.0  -  2.0**-47 

DELTA  2.0**-46  RANGE  -2.0  ..  2.0  -  2.0**-46 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531M . DEP  ' "  '  C45531N . DEP  C45532M . DEP 
C45532N.DEP 
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Compile  Time  Inapplicability 


The  following  tests  depend  on  the  value  of  SYSTEM. MAX_DIGITS: 

C24113*.DEP  C35705*.DEP  C35706*.DEP 

C35707*.DEP  C35708*.DEP  C35802*.DEP 

C45241*.DEP  C45321*.DEP  C45421*.DEP 

C45521*.DEP  C45524*.DEP  C45621*.DEP 

C45641*.DEP  C46012*.DEP 

Use  the  table  below  to  determine  which  of  these  tests  are  applicable 
based  on  the  value  of  SYSTEM. MAX_DIGITS. 

Last  Letter  of 
Value  of  Test  Name  of 

MAX_DIGITS  Applicable  Tests 


5 

A 

6 

A,B 

7 

A.  .C 

8 

A.  .D 

9 

A.  .E 

10 

A.  .F 

11 

A..G 

12 

A.  .H 

13 

A.. I 

14 

A..J 

15 

A.  .K 

16 

A..L 

17 

A.  .M 

18 

A.  .N 

19 

A.  .0 

20 

A.  .P 

21 

A.  .0 

22 

A.  .R 

23 

A.  .S 

24 

A..T 

25 

A.  .U 

26 

A..V 

27 

A.  .W 

28 

A..X 

29 

A..Y 

30 

A,.Z 

If  the  value  of  SYSTEM. MAX_DIGITS  >  35,  then  the  following  test  is 
inapplicable: 

r 

C4A011A.AOA 
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Compile  Time  Inapplicability 


If  a  generic  library-subprogram  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  test  is  inapplicable: 

CA1012A*.DEP 


If  a  generic  library-package  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  tests  are 
inapplicable: 

BC3204C*.DEP  BC3204D*.DEP 


If  a  generic,  non-library  package  body  cannot  be  compiled  as  a  subunit 
in  a  separate  file  than  its  specification,  then  the  following  test  is 
inapplicable: 

CA2009C*.DEP 


r  If  a  generic,  non-library  subprogram  body  cannot  be  compiled  as  a 

1  subunit  in  a  separate  file  than  its  specification,  then  the  following 

test  is  Inapplicable: 

*  CA2009P*.DEP 

; 

If  a  generic  procedure  cannot  have  subunits  which  are  compiled  in 
separate  files  than  the  generic  unit,  then  the  following  test  is 
inapplicable: 

I  CA3011A*.DEP 


If  package  SYSTEM  is  used  by  package  TEXT_IO,  then  the  following  test 
is  inapplicable: 

C86001P.DEP 

I 

I 

If  SEQUENTIAL_IO  cannot  be  instantiated  with  an  unconstrained  array 
type,  then  the  following  tests  are  inapplicable: 

1  AE2101C.DEP  EE2201D.ADA 


If  SEOUENTIAL_IO  cannot  be  instantiated  with  a  record  type  with 
discriminants  with  no  default  values,  then  the  following  tests  are 
inapplicable: 


AE2101C.DEP 


EE2201E.ADA 


Compile  Time  Inapplicability 


If  DIRECT  10  cannot  be  instantiated  vith  an  unconstrained  array  type, 
then  the  Tolloving  tests  are  inapplicable: 

AE2101H.DEP  EE2401D.ADA 


If  DIRECT_I0  cannot  be  instantiated  vith  a  record  type  with 
discriminants  vith  no  default  values,  then  the  following  tests  are 
inapplicable: 

AE2101H.DEP  EE2401G.ADA 


If  there  are  no  strings  which  are  illegal  as  external  file  names,  then 
the  following  tests  are  inapplicable: 

CE2102C.TST  CE2102H.TST 
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Tests  Which  Report  "NOT-APPLICABLE" 


This  section  is  concerned  vith  tests  that  can  detect,  at  runtime, 
certain  implementation  characteristics  that  make  the  tests  inapplicable. 
The  result  reported  for  these  tests  is  'NOT_APPLICABLE' .  These  tests  must 
compile  and  execute. 


If  USE_ERROR  or  NAME  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  with  mode  IN_FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  and  output;  See  AI -00332),  then  the  following  test 
should  rep'irt  HOT_APPLICABLE: 

CE3109A.ADA 


If  CREATE  with  mode  IN_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE: 

CE3102E.ADA 


If  OPEN  with  mode  IN  PILE  is  supported  for  text  files,  then  the 
following  test  shoul3  report  NOT__APPLICABLE: 

CE3102J.ADA 


If  USE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  wiTh  mode  0UT_FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  input  and  output;  see  AI-00332),  then  the  following  tests 
should  report  N0T_APPLI CABLE: 


CE2109C.ADA 

CE3107B.ADA 

CE3403A.ADA 

CE3408B.ADA 

CE3605A.ADA 

CE3905B.ADA 

EE3410F.A0A 


CE3102A.ADA 

CE3112C.ADA 

CE3406B.ADA 

CE3409A.A0A 

CE3605E.ADA 

EE3405B.ADA 


CE3102B.TST 

CE3402D.ADA 

CE3407B.ADA 

CE3410A.ADA 

CE3706P.ADA 

EE3409F.ADA 


If  CREATE  with  mode  0UT_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE; 


CE3102I.ADA 


Tests  Which  Report  "NOT-APPLICABLE 


If  OPEN  with  mode  0UT_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE; 

CE3102K.ADA 

If  RESET  is  supported  for  text  files,  then  the  following  test  should 
report  NOT_APPLI CABLE: 

CE3102F.ADA 

If  DELETE  for  text  files  is  supported,  then  the  following  test  should 
report  NOT_APPLICABLE: 

CE3102G.ADA 


If  USE_ERR0R  or  NAME  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  text  files  other  than  standard 
input  and  output;  see  AI-00332),  then  the  following  tests  should 
report  NOT_APPLICABLE: 


CE2108A.ADA 

CE2108D.ADA 

CE3104A.ADA 

CE3108B.ADA 

CE3112B.ADA 

CE3203A.ADA 

CE3301B.ADA 

CE3305A.ADA 

CE3402C.ADA 

CE3403E.ADA 

CE3404B.ADA 

CE3405A.ADA 

CE3405D.ADA 

CE3406D.ADA 

CE3408A.ADA 

CE3409D.ADA 

CE3410C.ADA 

CE3410F.ADA 

CE3411C.ADA 

CE3413C.ADA 

CE3602C.AbA 

CE3604A.ADA 

CE3605C.ADA 

CE3606B.ADA 

CE3704D.ADA 

CE3704M.ADA 

CE3706D.ADA 

CE3804B.ADA 


CE2108B.ADA 

CE3102H.ADA 

CE3104B.ADA 

CE3110A.ADA 

CE3112D.ADA 

CE3208A.ADA 

CE3301C.ADA 

CE3402A.ADA 

CE3403B.ADA 

CE3403F.ADA 

CE3404C.ADA 

CE3405B,ADA 

CE3406A.ADA 

CE3407A.ADA 

CE3408C.ADA 

CE3409E.ADA 

CE3410D.ADA 

CE3411A.ADA 

CE3412A.ADA 

CE3602A.ADA 

CE3602D.ADA 

CE3604B.ADA 

CE3605D.ADA 

CE3704A.ADA 

CE3704E.ADA 

CE3704N.ADA 

CE3706G.ADA 

CE3804C.ADA 


CE2108C.ADA 

CE3103A.ADA 

CE3108A.ADA 

CE3112A.ADA 

CE3114A.ADA 

CE3301A.ADA 

CE3302A.ADA 

CE3402B.ADA 

CE3403C.ADA 

CE3404A.ADA 

CE3404D.ADA 

CE3405C.ADA 

CE3406C.ADA 

CE3407C.ADA 

CE3409C.ADA 

CE3409F.ADA 

CE3410E.ADA 

CE3411B.ADA 

CE3413A.ADA 

CE3602B.ADA 

CE3603A.ADA 

CE3605B.ADA 

CE3606A.ADA 

CE3704B.ADA 

CE3704F.ADA 

CE37040.ADA 

CE3804A.ADA 

CE3804D.ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


CE3804B.ADA  CE3804P.ADA  CB3804G.ADA 
CE3804H.AOA  CE3804I.AOA  CE3804J.AOA 
CB3804K.ADA  CE3804L.ADA  CE3804H.AOA 
CE3804N.ADA  CE3804O.ADA  CE3804P.ADA 
CE3805A.ADA  CE3805B.ADA  CE3806A.ADA 
CE3806B.ADA  CE3806D.ADA  CB3806E.ADA 
CE3806G.ADA  CE3806H.ADA  CE3905A.ADA 
CE3905C.ADA  CE3905L.ADA  CB3906A.ADA 
CE3906B.ADA  CE3906C.ADA  CB3906B.ADA 
CE3906P.AOA  EB3203A.ADA  EE3402B.ADA 
EB3412C.AOA 


If  RESET  is  not  supported  for  text  files,  then  the  following  tests 
should  report  NOTAPPLICABLE: 

CE3104C.ADA  CE3115A.ADA 


If  DELETE  for  text  files  is  not  supported,  then  the  following  tests 
should  report  NOT_APPLI CABLE: 

CE3110A.ADA  CE3114A.ADA 


If  association  of  multiple  internal  text  files  to  a  single  external 
file  is  not  supported,  then  the  following  tests  should  report 
NOT_APPLICABLE! 

CE2110B.ADA  CE3111A.ADA  CE3111B.ADA 
CE3111C.ADA  CE3111D.ADA  CE3111E.ADA 
CE3114B.ADA  CE3115A.ADA 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  with  mode  IN  PILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  ?oes  not  support  sequential 
files;  see  AI-00332)'  then  the  following  test  should  report 
NOT_APPLICABLE: 

CE210SA.AOA 


If  CREATE  and  OPEN  with  mode  IN_FILE  are  supported  for  sequential 
files,  then  the  following  tests  should  report  NOT_APPLI CABLE; 

CE2102D.ADA  CE2102N.ADA 
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Tests  Which  Report  "NOT-APPLICABLE" 


If  RESET  to  mode  IN_FILE  is  supported  for  sequential  files  ,  then  the 
following  tests  should  report  NOT_APPLICABLE : 

CE21020.ADA  .:E2111F.ADA  CE2111I.ADA 

CE2204C.ADA 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  with  mode  OUT  FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  9oes  not  support  sequential 
files;  see  AI-00332),  then  the  following  tests  should  report 
NOT_APPLICABLE: 

CE2102A.ADA  CE2102C.TST  CE2102X.ADA 
CE2106A.ADA  CE2108E.ADA  CE2109A.ADA 
CE2110A.ADA 


If  CREATE  and  OPEN  with  mode  OUT_FILE  are  supported,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CE2102E.ADA  CE2102P.ADA 


If  RESET  to  mode  OUT  FILE  is  supported  for  sequential  files,  then  the 
following  test  should  report  NOT_APPLICABLE: 

CE2102Q.ADA 


If  RESET  to  mode  0UT_FILE  is  not  supported  for  sequential  files,  then 
the  following  tests  should  report  NOT_APPLICABLE: 

CE2111C.ADA  CE2111D.ADA  CE2111F.ADA 
CE2111I.ADA 


If  DELETE  for  sequential  files  is  not  supported,  then  the  following 
tests  should  report  NOT_APPLI CABLE: 

CE2106A.AOA  CE2110A.AOA 


If  association  of  multiple  internal  sequential  files  to  a  single 
external  file  is 'not  supported,  then  the  following  tests  should  report 
NOTAPPLICABLE: 

CE2107A.ADA  CE2107B.ADA  CE2107C.ADA 
CE2107D.ADA  CE2111D.ADA 
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Tests  Which  Report  "NOT-APPLICABLE" 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  sequential  files;  see  AX -00332), 
then  the  following  tests  should  report  NOT_APPLICAfiLE: 

CE2103C.ADA  CE2102G.ADA  CE2104A.ADA 
CE2104B.AOA  CE2108A.ADA  CE2108B.AOA 
CE2108F.AOA  CB2111A.ADA  CE2115B.ADA 
CE2201A.AOA  CE2201B.ADA  CE2201C.AOA 
CE2201F.ADA  CE2201G.A0A  CE2201H.ADA 
CE2201I.ADA  CE2201J.ADA  CE2201K.ADA 
CE2201L.ADA  CE2201M.ADA  CE2201N.ADA 
CE2204A.ADA  CE2204B.ADA  CE2204C.ADA 
CE22040.A0A  CE2205A.A0A  CE2208B.A0A 
CE2210A.AOA 


If  USE__ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  IN_FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  direct  access 
files;  see  AI -00332),  then  the  following  tests  should  report 
N0T_APPLICABLE: 

CE2105B.ADA  CE2401E.ADA  CE2401F.ADA 
CE2401H.ADA  CE2401I.A0A  CE2401J.ADA 
CE2405B.ADA  CE2407A.ADA 


If  CREATE  with  mode  IN_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  N0T_APPLICABLE*. 

CE2102I.ADA 


If  OPEN  with  mode  IN  FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  N0T_APPLI CABLE: 

CE2102T.ADA 


If  RESET  with  mode  IN  FILE  is  supported  for  direct  access  files,  then 
the  following  tests  sHould  report  NOT_APPLICABLE: 

CE2102U.ADA  -  CE2407B.ADA 


If  RESET  with  mode  IN^FILE  is  not  supported  for  direct  access  files, 
then  the  following  tests  should  report  NOT_APPLICABLE : 

CE2111B.ADA  CE2111G.ADA  CE2111H.ADA 
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Tests  Which  Report  "NOT-APPLICABLE 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  OUT_FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  direct  access 
files;  see  AI-00332),  then  the  following  tests  should  report 
NOT_APPLI CABLE: 

CE2102B.ADA  CE2102Y.ADA  CE2106B.ADA 
CE2110C.ADA  CE2401K.ADA  CE2404A.ADA 
CE2404B.ADA  CE2407A.ADA  CE2407B.ADA 
CE2408A.ADA  CE2409B.ADA  CE2410A.ADA 
CE2410B.ADA 


If  CREATE  and  OPEN  with  mode  0UT_FILE  is  supported  for  direct  access 
files,  then  the  following  tests  should  report  NOT_APPLICABLE: 

CE2102J.ADA  CE2 102V. ADA 


If  RESET  with  mode  0UT_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  N0T_APPLI CABLE: 

CE2102y.ADA 


If  USE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  INOUT  FILE  (this  is  the 
appropriate  behavior  for  an  implementation  whicH  does  not  support 
direct  access  files;  see  AI-00332),.  then  the  following  tests  should 
report  N0T_APPLI CABLE: 

CE2102H.TST  CE2109B.ADA  CE2401E.ADA 
CE2401F.ADA  CE2401H.ADA  CE2401I.ADA 
CE2401J.ADA  CE2401K.ADA  CE2401L.ADA 
CE2405B.ADA  CE2408B,ADA  CE2409A.ADA 


If  CREATE  and  OPEN  with  mode  INOUT_FILE  are  supported  for  direct 
access  files,  then  the  following  tests  should  report  N0T_APP LI CABLE: 

CE2102F.AOA  CE2102R.AOA 


If  RESET  to  mode , INOUT_PILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  NOT_APPLICABLE; 


CE2102S.ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


If  DELETE  for  direct  access  files  is  not  supported,  then  the  following 
tests  should  report  NOT_APPLICABLE: 

CE2106B.ADA  CE2110C.ADA 


If  association  of  multiple  internal  direct  access  files  to  a  single 
external  file  is  not  supported,  then  the  following  tests  should  report 
NOTAPPLI CABLE: 

CE2107P.ADA  CE2107G.ADA  CE2107H.ADA 
CE2 1071. ADA  CE2110D.AOA  CE21iie.ADA 


If  USB_ERR0R  or  NAME_ERR0R  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  direct  access  files;  see 
AI-00332),  then  the  following  tests  should  report  N0T_APPLI CABLE; 

CE2102K.ADA  CE2103D.ADA  CE2104C.ADA 
CE2104D.ADA  CE2108C.ADA  CE2108D.ADA 
CE2108G.ADA  CE2108H.ADA  CE2111E.ADA 
CE2115A.ADA  CE2401A.ADA  CE2401B.ADA 
CE2401C.ADA  CE2406A.ADA  CE2411A.ADA 


If  association  of  an  internal  sequential  file  and  an  internal  direct 
access  file  to  a  single  external  file  is  not  supported,  then  the 
following  tests  should  report  N0T_APPLI CABLE: 

CE2107E.ADA  CE2107L.ADA 


If  the  INLINE  pragma  is  not  supported  for  PROCEDURES,  then  the 
following  tests  should  report  N0T_APPLI CABLE: 

CA3004E*.ADA  EA3004C*.ADA  LA3004A*.ADA 


If  the  INLINE  pragma  is  not  supported  for  FUNCTIONS,  then  the 
following  tests  should  report  NOT_APPLICABLE; 

CA3004P*.ADA  EA3004D*.ADA  LA3004B*.ADA 


If  excessive  recursion  causes  STORAGE  ERROR  to  be  raised,  then  the 
following  test  should  report  NOT_APPLlCABLE : 


D64005F*.ADA 


Tests  Which  Report  "NOT-APPLICABLE 


If  DURATION' FIRST  =  DURATION 'BASE' FIRST  or  DURATION' LAST 
DURATION' BASE' LAST,  then  the  following  test  should  report 
NOT_APPLI CABLE,  if  it  otherwise  executes  properly; 

C96005B.TST 


Consider  the  declaration 

TYPE  F  IS  DIGITS  SYSTEM. MAX_DIGITS; 

If  F'MACHINE_OVERFLOWS  is  false  and  2.0  *  F'MACHINE  RADIX  ** 

F' MACHINE_EMAX  <■  F ' BASE ' LARGE ,  then  the  following  test  should  report 
N0T_APPLI CABLE  if  it  compiles  without  error: 


% 


C4A013B.ADA 


APPENDIX  C 


Package  REPORT  Specification  and  Body 


—  REPSPEC.ADA 

—  PURPOSE: 

THIS  REPORT  PACKAGE  PROVIDES  THE  MECHANISM  FOR  REPORTING  THE 
PASS/FAIL/NOT-APPLICABLE  RESULTS  OF  EXECUTABLE  (CLASSES  A,  C, 
D,  E,  AND  L)  TESTS. 

IT  ALSO  PROVIDES  THE  MECHANISM  FOR  GUARANTEEING  THAT  CERTAIN 
VALUES  BECOME  DYNAMIC  (NOT  KNOWN  AT  COMPILE-TIME). 

—  HISTORY: 

JRK  12/13/79 
JRK  06/10/80 
JRK  08/06/81 
JRK  10/27/82 
JRK  06/01/84 

PVB  07/30/87  ADDED  PROCEDURE  SPECIALACTION. 

TBN  08/20/87  ADDED  FUNCTION  LEGAL_FILE_NAME. 

PACKAGE  REPORT  IS 


SUBTYPE  PILE  NUM  IS  INTEGER  RANGE  1..3; 


—  THE  REPORT  ROUTINES. 
PROCEDURE  TEST  "  ' ' 


(  NAME  :  STRING; 
DESCR  :  STRING 


—  THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 

—  START  OP  A  TEST,  BEFORE  ANY  OP  THE 

—  OTHER  REPORT  ROUTINES  ARE  INVOKED. 

—  IT  SAVES  THE  TEST  NAME  AND  OUTPUTS  THE 

—  NAME  AND  DESCRIPTION. 

—  TEST  NAME,  E.G.,  "C23001A-AB" . 

—  BRIEF  DESCRIPTION  OF  TEST,  E.G., 

—  "UPPER/LOVER  CASE  EQUIVALENCE  IN  "  & 
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—  "IDENTIFIERS' 


PROCEDURE  FAILED 


(  DESCR  :  STRING 


OUTPUT  A  FAILURE  MESSAGE.  SHOULD  BE 
INVOKED  SEPARATELY  TO  REPORT  THE 
FAILURE  OF  EACH  SUBTEST  WITHIN  A  TEST. 
BRIEF  DESCRIPTION  OF  WHAT  FAILED. 
SHOULD  BE  PHRASED  AS: 

"(FAILED  BECAUSE)  ...REASON...". 


PROCEDURE  NOT  APPLICABLE  — 


(  DESCR  :  STRING 


OUTPUT  A  NOT-APPLICABLE  MESSAGE. 

SHOULD  BE  INVOKED  SEPARATELY  TO  REPORT 
THE  NON-APPLICABILITY  OF  EACH  SUBTEST 
WITHIN  A  TEST. 

BRIEF  DESCRIPTION  OP  WHAT  IS 
NOT-APPLICABLE.  SHOULD  BE  PHRASED  AS: 
"(NOT-APPLICABLE  BECAUSE). . .REASON. . .". 


PROCEDURE  SPECIAL  ACTION  — 


(  DESCR  :  STRING 


OUTPUT  A  MESSAGE  DESCRIBING  SPECIAL 
ACTIONS  TO  BE  TAKEN. 

SHOULD  BE  INVOKED  SEPARATELY  TO  GIVE 
EACH  SPECIAL  ACTION. 

BRIEF  DESCRIPTION  OP  ACTION  TO  BE 
TAKEN. 


PROCEDURE  COMMENT 
(  DESCR  :  STRING 
); 

PROCEDURE  RESULT; 


OUTPUT  A  COMMENT  MESSAGE. 
THE  MESSAGE. 


THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 
END  OF  A  TEST.  IT  OUTPUTS  A  MESSAGE 
INDICATING  WHETHER  THE  TEST  AS  A 
WHOLE  HAS  PASSED,  FAILED,  IS 
NOT-APPLICABLE,  OR  HAS  TENTATIVELY 
PASSED  PENDING  SPECIAL  ACTIONS. 


-  THE  DYNAMIC  VALUE  ROUTINES. 


—  EVEN  WITH  STATIC  ARGUMENTS,  THESE  FUNCTIONS  WILL  HAVE  DYNAMIC 

—  RESULTS. 


FUNCTION  IDENT_INf  —  AN  IDENTITY  FUNCTION  FOR  TYPE  INTEGER. 

(  X  :  INTEGER  —  THE  ARGUMENT. 

)  RETURN  INTEGER;  —  X. 

FUNCTION  IDENT_CHAR  —  AN  IDENTITY  FUNCTION  FOR  TYPE 

—  CHARACTER. 

(  X  :  CHARACTER  —  THE  ARGUMENT. 

)  RETURN  CHARACTER;  —  X. 
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FUNCTION  IDENT_BOOL  —  AN  IDENTITY  FUNCTION  FOR  TYPE  BOOLEAN. 

(  X  ;  BOOLEAN  —  THE  ARGUMENT. 

)  RETURN  BOOLEAN;  —  X. 

FUNCTION  IDENT_STR  —  AN  IDENTITY  FUNCTION  FOR  TYPE  STRING. 

(  X  :  STRING  —  THE  ARGUMENT. 

)  RETURN  STRING;  —  X. 

FUNCTION  EQUAL  —  A  RECURSIVE  EQUALITY  FUNCTION  FOR  TYPE 

—  INTEGER. 

(  X,  Y  :  INTEGER  —  THE  ARGUMENTS. 

)  RETURN  BOOLEAN;  —  X  -  Y. 

—  OTHER  UTILITY  ROUTINES. 

FUNCTION  LEGAL_FILE_NAME  —  A  FUNCTION  TO  GENERATE  LEGAL  EXTERNAL 

—  FILE  NAMES. 

(  X  :  FILE_NUM  :=  1;  —  DETERMINES  FIRST  CHARACTER  OF  NAME. 

NAM  :  STRING  —  DETERMINES  REST  OF  NAME. 

)  RETURN  STRING;  —  THE  GENERATED  NAME. 


END  REPORT 


REPORT  Package  Body 


—  REPBODY.ADA 

—  HISTORY: 

DCB  04/27/80 
JRK  6/10/80 
JRK  11/12/80 
JRK  8/6/81 
JRK  10/27/82 
JRK  6/1/84 

JRK  11/18/85  ADDED  PRAGMA  ELABORATE. 

PWB  07/29/87  ADDED  STATUS  ACTIONREQUIRED  AND 
PROCEDURE  SPECIAL_ACTION. 

TBN  08/20/87  ADDED  FUNCTION  LEGAL_PILE_NAME. 

WITH  TEXT  10; 

USE  text_To; 

PRAGMA  ELABORATE  (TEXTIO); 

PACKAGE  BODY  REPORT  IS 

TYPE  STATUS  IS  (PASS,  FAIL,  DOES_NOT_APPLY ,  ACTION_REQUIRED) ; 
TEST_STATUS  :  STATUS  FAIL; 

MAX_NAME_LEN  :  CONSTANT  15;  —  MAXIMUM  TEST  NAME  LENGTH. 

TEST_NAME  :  STRING  (1. .MAX_NAME_LFN); 

NO  NAME  :  CONSTANT  STRING  (1..7)  J.  "NO  NAME"; 

TEST_NAME_LEN  :  INTEGER  RANGE  0 . . MAX_NAME_LEN  0; 

PROCEDURE  PUT_MSG  (MSG  :  STRING)  IS 

—  WRITE  MESSAGE.  LONG  MESSAGES  ARE  FOLDED  (AND  INDENTED). 
MAX_LEN  :  CONSTANT  INTEGER  RANGE  50.. 150  72;  —  MAXIMUM 

—  OUTPUT  LINE  LENGTH. 

INDENT  :  CONSTANT  INTEGER  TEST_NAME  LEN  +  9;  —  AMOUNT  TO 

—  indent  continuation  LINES. 

I  :  INTEGER  0;  —  CURRENT  INDENTATION. 

M  :  INTEGER  MSG 'FIRST;  —  START  OF  MESSAGE  SLICE. 

N  :  INTEGER;  —  END  OP  MESSAGE  SLICE. 

BEGIN 

LOOP 

IF  I  +  (MSG'LAST-M+1)  >  MAXLEN  THEN 
N  M  +  (MAX_LEN-I)  -  1; 

IF  MSG  (N)  />  '  '  THEN 

WHILE  N  >-  M  AND  THEN  MSG  (N+1)  /-  '  '  LOOP 
N  N  -  1; 

END  LOOP; 

IP  N  <  M  THEN 

N  M  +  (MAX_LEN-I)  -  1; 

END  IF; 

END  IF; 

ELSE  N  :«  MSG 'LAST; 

END  IF; 
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SET  COL  (STANDARD  OUTPUT,  COUNT  (I+l)); 

PUT'LINE  (STANDARD_0UTPUT,  MSG  (M..N)); 

I  INDENT; 

M  :=.  N  +  1; 

WHILE  M  <-  MSG' LAST  AND  THEN  MSG  (M)  =  '  '  LOOP 
M  M  +  1; 

END  LOOP; 

EXIT  WHEN  M  >  MSG' LAST; 

END  LOOP; 

END  PUT_MSG; 

PROCEDURE  TEST  (NAME  :  STRING;  DESCR  :  STRING)  IS 
BEGIN 

TEST_STATUS  :=  PASS; 

IF  NAME' LENGTH  <=  MAX_NAME  LEN  THEN 
TEST_NAME_LEN  NAME'LENGTH; 

ELSE  TEST_NAME_LEN  MAX_NAME_LEN ; 

END  IF; 

TEST_NAME  (1. .TEST_NAME_LEN)  := 

NAME  (NAME' FIRST  ..  NAME' FIRST+TEST_NAME_LEN-1) ; 
PUT_MSG  (""); 

PUT_MSG  (" -  "  &  TEST_NAME  (1 . .TEST_NAME_LEN)  &  "  "  & 

DESCR  & 

END  TEST; 

PROCEDURE  COMMENT  (DESCR  :  STRING)  IS 
BEGIN 

PUT_MSG  ("  -  "  &  TEST_NAME  ( 1 . . TEST_NAME  LEN)  &  "  "  & 

DESCR  &  "."); 

END  COMMENT; 

PROCEDURE  FAILED  (DESCR  :  STRING)  IS 
BEGIN 

TEST_STATUS  FAIL; 

PUT_MSG  ("  *  "  &  TEST_NAME  (1. .TEST_NAME_LEN)  &  "  "  & 

DESCR  &  "."); 

END  FAILED; 

PROCEDURE  NOT_APPLICABLE  (DESCR  :  STRING)  IS 
BEGIN 

IP  TEST_STATUS  -  PASS  OR  TEST_STATUS  -  ACTION_REQUIRED  THEN 
TEST_STATUS  DOES_NOT_APPLY; 

END  IP; 

PUT_MSG  ("  ■+  "  &  TEST_NAME  (1. .TEST_NAME_LEN)  &  "  "  & 

DESCR  &  "."); 

END  NOT_APPLICABLE; 

PROCEDURE  SPECIAL_ACTION  (DESCR  :  STRING)  IS 
BEGIN 

IF  TEST_STATUS  =  PASS  THEN 

TEST_STATUS  ACTIONREQUIRED; 

END  IF; 
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PUT_MSG  ("  I  "  &  TEST_NAMB  (1. .TEST_NAME_LEN)  &  "  "  & 

DESCR  & 

END  SPECIAL_ACTION; 

PROCEDURE  RESULT  IS 
BEGIN 

CASE  TEST_STATUS  IS 
WHEN  PASS  => 

PUT_MSG  "  &  TEST_NAME  (1.  .TEST_NAME_LEN)  & 

"  PASSED 
WHEN  DOES_NOT  APPLY  -> 

PUT_MSG  7"++++  "  &  TEST_NAME  ( 1 . .TEST_NAME_LEN)  & 

"  NOT-APPLICABLE  ++++++++++++++++++++."); 

WHEN  ACTION_REQUIRED  -> 

PUT_MSG  ("!!!1  "  &  TEST  NAME  (1..TEST  NAME  LEN)  & 

"  TENTATIVELY  PASSED  1 1 ! I!! iT! 1 ! !T! 1 ! . " ) ; 
PUT_MSG  ("im  "  &  (1.  .TEST_NAME_LEN  ->  '  ')  & 

"  SEE  M'  COMMENTS  FOR  SPECIAL  NOTES! 1"); 

WHEN  OTHERS  -> 

PUT_MSG  ("*★**  "  &  TEST  NAME  (1. .TEST_NAME_LEN)  & 

"  FAILED  ****************************."). 

END  CASE; 

TEST_STATUS  FAIL; 

TEST_NAME_LEN  NO_NAME ' LENGTH ; 

TEST_NAME  <1. .TEST_NAME_LEN)  :*  NO_NAME; 

END  RESULT; 

FUNCTION  IDENT_INT  (X  :  INTEGER)  RETURN  INTEGER  IS 
BEGIN 

IF  EQUAL  (X,  X)  THEN  —  ALWAYS  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  0;  —  NEVER  EXECUTED. 

END  IDENT_INT; 

FUNCTION  IDENT_CHAR  (X  :  CHARACTER)  RETURN  CHARACTER  IS 
BEGIN 

IF  EQUAL  (CHARACTER' POS(X),  CHARACTER' POS(X) )  THEN  —  ALWAYS 

—  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IP; 

RETURN  'O';  —  NEVER  EXECUTED. 

END  IDENT_CHAR; 

FUNCTION  IDENT_BOOL  (X  ;  BOOLEAN)  RETURN  BOOLEAN  IS 
BEGIN 

IF  EQUAL  (BOOLEAN' POS(X),  BOOLEAN' POS(X) )  THEN  —  ALWAYS 

—  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  FALSE;  —  NEVER  EXECUTED. 

END  IDENT  BOOL; 
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FUNCTION  IDENT_STR  (X  :  STRING)  RETURN  STRING  IS 
BEGIN 

IF  EQUAL  (X' LENGTH,  X' LENGTH)  THEN  —  ALWAYS  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  —  NEVER  EXECUTED. 

END  IDENT_STR; 

FUNCTION  EQUAL  (X,  Y  :  INTEGER)  RETURN  BOOLEAN  IS 

REC_LIMIT  :  CONSTANT  INTEGER  RANGE  1..100  :=■  3;  —  RECURSION 

—  LIMIT. 

Z  :  BOOLEAN;  —  RESULT. 

BEGIN 

IF  X  <  0  THEN 

IF  Y  <  0  THEN 

Z  EQUAL  (-X,  -Y); 

ELSE  Z  FALSE; 

END  IF; 

ELSIF  X  >  REC_LIMIT  THEN 

Z  :=  EQUAL  (REC_LIMIT,  Y-X+REC_LIMIT) ; 

ELSIF  X  >  0  THEN 

Z  EQUAL  (X-1,  Y-l); 

ELSE  Z  Y  =  0; 

END  IF; 

RETURN  Z; 

EXCEPTION 

WHEN  OTHERS  => 

RETURN  X  =  Y; 

END  EQUAL; 

FUNCTION  LEGAL  FILE  NAME  (X  :  FILE_NUM  1; 

NAM  :  STRING  :=.  "") 

RETURN  STRING  IS 
SUFFIX  :  STRING  (2.. 6); 

BEGIN 

IF  NAM  =  ""  THEN 

SUFFIX  TEST_NAME(3..7); 

ELSE 

SUFFIX  NAM(3..7); 

END  IF; 

CASE  X  IS 

WHEN  1  ->  RETURN  ('X'  &  SUFFIX); 

WHEN  2  ->  RETURN  ('Y'  &  SUFFIX); 

WHEN  3  .^.RETURN  ('Z'  &  SUFFIX); 

END  CASE; 

END  LEGAL_FILE_NAME; 

BEGIN 

TEST_NAME_LEN  NO_NAME ' LENGTH ; 

TEST  NAME  (1..TEST  NAME  LEN)  NO  NAME; 
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Procedure  CHECKFILE  Body 


—  CHECK_FILE.ADA 

—  THIS  IS  A  PROCEDURE  USED  BY  MANY  OP  THE  CHAPTER  14  TESTS  TO  CHECK  THE 

—  CONTENTS  OP  A  TEXT  FILE. 

—  THIS  PROCEDURE  ASSUMES  THE  FILE  PARAMETER  PASSED  TO  IT  IS  AN  OPEN 

—  TEXT  FILE. 

—  THE  STRING  PARAMETER  CONTAINS  THE  CHARACTERS  THAT  ARE  SUPPOSED  TO  BE 

—  IN  THE  TEXT  FILE.  A  CHARACTER  IS  USED  IN  THE  STRING  TO  DENOTE 

—  THE  END  OF  A  LINE.  A  CHARACTER  IS  USED  TO  DENOTE  THE  END  OF  A 

—  PAGE,  k  •%'  CHARACTER  IS  USED  TO  DENOTE  THE  END  OF  THE  TEXT  PILE. 

—  THESE  SYMBOLS  SHOULD  NOT  BE  USED  AS  TEXT  OUTPUT. 

—  SPS  11/30/82 

—  JBG  2/3/83 

WITH  REPORT;  USE  REPORT; 

WITH  TEXT_IO;  USE  TEXT_IO; 

PROCEDURE  CHECK_FILE  (FILE;  IN  OUT  FILE_TYPE;  CONTENTS  :  STRING)  IS 
X  :  CHARACTER; 

COL_COUNT  :  POSITIVE  COUNT  1; 

LINECOUNT  ;  POSITIVE_COUNT  ;*  1; 

PAGE_COUNT  :  POSltlVE_COUNT  1; 

TRAILING_BLANKS_MSG_WRITTEN  :  BOOLEAN  FALSE; 

STOPPROCESSING  :  EXCEPTION; 

PROCEDURE  CHECK_END_OF_LINE  (EXPECT  ENDOF  PAGE  :  BOOLEAN)  IS 
BEGIN 

—  SKIP  OVER  ANY  TRAILING  BLANKS.  AN  IMPLEMENTATION  CAN  LEGALLY 
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—  APPEND  BLANKS  TO  THE  END  OP  ANY  LINE. 

WHILE  NOT  END_OF_LINE  (FILE)  LOOP 
GET  (FILE,  X); 

IP  X  /-  '  '  THEN 

FAILED  ("FROM  CHECK_PILE:  END  OF  LINE  EXPECTED  -  " 
X  &  "  ENCOUNTERED"); 

RAISE  STOPPROCESSING; 

ELSE 

IP  NOT  TRAILING  BLANKS_MSG_VRITTEN  THEN 
COMMENT  ("FROM  CHECKFILE:  "  & 

"THIS  IMPLEMENTATION  PADS  "  & 

"LINES  WITH  BLANKS"); 
TRAILING_BLANKS_MSG_WRITTEN  TRUE; 

END  IF; 

END  IF; 

END  LOOP; 

IP  LINE_COUNT  /-  LINE  (FILE)  THEN 
FAILED  ("FROM  CHECKFILE:  "  & 

"LINE  COUNT  INCORRECT  -  EXPECTED  "  & 
POSITIVE_COUNT'IMAGE(LINB_COUNT)  & 

"  GOT  FROM  PILE  "  & 

POSITIVE  COUNT'IMAGE(LINE(PILE))); 

END  IF; 

—  NOTE:  DO  NOT  SKIPLINE  WHEN  AT  END  OF  PAGE  BECAUSE  SKIP  LINE  WILL 

ALSO  SKIP  THE  PAGE  TERMINATOR.  SEE  RM  14.3.5  PARAGRAPH  1. 

IP  NOT  EXPECT  END  OF  PAGE  THEN 
IF  END_OF_PAGE  TFILE)  THEN 

FAILED  ("FROM  CHECK_FILE:  PREMATURE  END  OP  PAGE"); 
RAISE  STOP_PROCESSING; 

ELSE 

SKIP_LINE  (FILE); 

LINE_COUNT  :=  LINE  COUNT  +  1; 

END  IF; 

END  IP; 

COL  COUNT  :-  1; 

END  CHECK_END_OP_LINE; 

PROCEDURE  CeECK_END_OF_PAGE  IS 
BEGIN  "" 

IF  NOT  END  OP  PAGE  (FILE)  THEN 

FAILED' (^PROM  CHECKFILE:  "  & 

"ENDOPPAGE  NOT  WHERE  EXPECTED"); 

RAISE  STOP  PROCESSING; 

ELSE 

IF  PAGECOUNT  /.  PAGE  (FILE)  THEN 
FAILED  ("FROM  CHBCK_FILE:  "  & 

"PAGE  COUNT  INCORRECT  -  EXPECTED  "  & 
POSITIVE  COUNT' IMAGE  (PAGE  COUNT)  & 
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"  GOT  FROM  FILE  "  & 

POSITIVE_COtJNT' IMAGE  (PAGE(FILE) ) ) ; 

END  IF; 

SKIPPAGE  (FILE); 

PAGE_COUNT  PAGE_COUNT  +  1; 

LINE_COUNT  1; 

END  IF; 

END  CHECK  END  OF  PAGE; 


RESET  (FILE,  IN_FILE); 

SET_LINE_LENGTH  (STANDARD_OUTPUT,  0); 

SET_PAGE_LENGTe  (STANDARD_OUTPUT,  0); 

FOR  I  IN  1  ..  CONTEKrS' LENGTH  LOOP 

BEGIN 

CASE  CONTENTS  (I)  IS 
VHEN  -> 

CHECK_END_OP_LINE  (CONTENTS  (I  +  1)  - 
VHEN  -> 

CHECK_END_OF_PAGE ; 

VHEN 

IF  NOT  END  OF  FILE  (FILE)  THEN 

FAILED  (^FROM  CHECK_FILE;  "  & 

"END  OF  FILE  NOT  VHERE  EXPECTED"); 
RAISE  STOP_PROCESSING; 

END  IF; 

VHEN  OTHERS  => 

IF  COL_COUNT  /-  COL(FILE)  THEN 

FAILED  ("FROM  CHECK_FILE:  "  & 

"COL  COUNT  INCORRECT  -  "  & 
"EXPECTED  "  &  POSITIVECOUNT' 
IMAGE(COL_COUNT)  &  "  GOT  FROM  "  & 
"FILE  "  &  POSITIVE_COUNT' IMAGE 
(COL(FILE))); 

END  IF; 

GET  (PILE,  X); 

COL_COUNT  COL_COUNT  +  1; 

IF  X  /-  CONTENTS  (I)  THEN 

FAILED("FROM  CHECK  FILE;  "  & 

"FILE  DOES  NOT  CONTAIN  CORRECT  "  & 
"OUTPUT  -  EXPECTED  "  h  CONTENTS(I) 
&  "  -  GOT  "  &  X); 

RAISE  STOPPROCESSING; 

END  IF; 

END  CASE; 

EXCEPTION 

VHEN  STOPPROCESSING  -> 

COMMENT  ("FROM  CHECK  PILE;  "  & 
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"LAST  CHARACTER  IN  FOLLOWING  STRING  "  & 
"REVEALED  ERROR:  "  &  CONTENTS  (1  ..  I)); 

EXIT; 

END; 

END  LOOP; 

EXCEPTION 

WHEN  STATUS_ERROR  -> 

FAILED  ("FROM  CHECKPILE:  "  & 

"STATUS_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  MODE  ERROR  -> 

FAILED  ("FROM  CHECKPILE:  "  & 

"MODEERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  NAME  ERROR  -> 

FAILED  ("FROM  CHECKPILE:  "  & 

"NAMEERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  USEERROR  »> 

FAILED  ("PROM  CHECK_FILE:  "  & 

"USE_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DEVICEERROR  -> 

FAILED  ("PROM  CHECK  PILE:  "  & 

"DEVICE_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  END_ERROR  -> 

FAILED  ("FROM  CHECK_FILE:  "  & 

"END  ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DATA  ERROR 

FAILED  ("FROM  CHECK_FILE:  "  A 

"DATA_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  UYOirr_ERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"LAYOUTERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  OTHERS  -> 

FAILED  ("FROM  CHECK_FILE:  "  & 

"SOME  EXCEPTION  RAISED  -  FILE  CHECKING  INCOMPLETE"); 


END  CHECK  FILE; 
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Sample  Output  Of  Acceptance  Tests 


Test  CZIIOIA.ADA  should  produce  the  following  on  STANDARD  OUTPUT: 


-  NONAME  CZIIOIA-AB:  CHECK  REPORT  ROUTINES.  CHECKING  'COMMENT'. 

-  NONAME  CHECKING  'PUT  MSG'  FOR  PROPER  OUTPUT. 

-  NO_NAME  THIS  LINE  IS  EXACTLY  'MAX_LEN'  LONG . 5... 60 _ 5... 70.. 

-  N0_NAME  THIS  COMMENT  HAS  A  WORD  THAT  SPANS  THE  FOLD  POINT.  THIS 

COMMENT  FITS  EXACTLY  ON  TWO  LINES.  ...5... 60 _ 5... 70.. 

-  NONAME  THIS  COMMENT  HAS  A  WORD  THAT  ENDS  AT  THE  FOLD  POINT  ...70.. 

THE  SPACES  JUST  AFTER  THE  FOLD  POINT  SHOULD  BE  GONE. 

-  NONAME  THIS  COMMENT  HAS  A  WORD  THAT  BEGINS  AT  THE  FOLD  POINT. 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NO_NAHE  THIS  COMMENT  HAS  SPACES  SPANNING  THE  FOLD  POINT.  ..5... 70 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NONAME 

THIS_COMMENT_IS_ONE_VERY_LONG_WORD_AND_SO  ITSHOULDBES 
PLIT_AT_THE_POLD  POINT. 

-  NONAME  CHECKING  THAT  REPORT  BODY  INITIALIZES  TO  'NONAME'  AND 

'FAILED'.  CHECKING  'RESULT'. 

****  NO  NAME  FAILED  ********************, 

-  PASS_TEST  CHECKING  'TEST'  AND  'RESULT'  FOR  'PASSED'. 

-  PASS_TEST  CHECKING  THAT  INDENTATION  OF  CONTINUATION  LINES  IS 

ADJUSTED  ACCORDING  TO  TEST  NAME  LENGTH. 

PASS_TEST  PASSED 

-  NO_NAME  CHECKING  'RESULT'  FOR  RESETTING  TO  'NO  NAME'  AND  'FAILED'. 

****  NO  NAME  FAILED  ********************.  ~ 

-  NO"NAME  CHECKING  THAT  INDENTATION  OF  CONTINUATION  LINES  IS  ADJUSTED 

ACCORDING  TO  TEST  NAME  LENGTH. 

-  FAIL_TEST  CHECKING  'FAILED'  AND  'RESULT'  FOR  'FAILED'. 

*  FAIL_TEST  CHECKING  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

****  FAIL  TEST  FAILED  ********************. 

-  NATEST  CHECKING  'NOTAPPLICABLE'  AND  'RESULT'  FOR 

'N0T-APPLICA5LE' . 

+  NA_TEST  CHECKING  'NOTAPPLICABLE' .  NOW  'RESULT'  SHOULD  BE 
'NOT-APPLI CABLE' . 

++++  NA_TEST  NOT-APPLICABLE  +++++♦♦+++++++++++++. 

-  FAIL_NA  TEST  CHECKING  'FAILED',  'NOT_APPLICABLE' ,  AND  'RESULT'  FOR 

'FAILED'. 

+  FAIL_NA  TEST  CHBqtlNG  'NOT_APPLICABLE' .  NOW  'RESULT'  SHOULD  BE 
'NOT-APPLICABLE' . 

*  FAIL_NA_TEbr  CHECKING  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

+  FAIL_NA_TEST  CHECKING  'NOT_APPLICABLE' .  NOW  'RESULT'  SHOULD  STAY 

'FAILED' . 

****  FAIL  NA  TEST  FAILED  ********************. 

-  NO  NAME’END  CZllOlA. 
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Test  CZ1103A. ADA  should  produce  the  following  on  STANDARD_OUTPUT : 


-  CZ1103A  CHECK  THAT  PROCEDURE  CHECK_FILE  WORKS. 

/-  CZ1103A  BEGIN  TEST  WITH  AN  EMPTY  FILE. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  BLANK  LINES. 

'  -  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  BLANK  LINES  AND  PAGES. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  TRAILING  BLANKS. 

-  CZ1103A  FROM  CHECK_FILE:  THIS  IMPLEMENTATION  PADS  LINES  WITH 

BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITHOUT  TRAILING  BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  AN  END  OF  LINE  ERROR. 

*  CZ1103A  FROM  CHECKFILE:  END  OF  LINE  EXPECTED  -  E  ENCOUNTERED. 

-  CZ1103A  FROM  CHECK  FILE;  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR;  THIS  LINE  WILL  CONTAIN  AN  #. 

-  CZ1103A  BEGIN  TEST  WITH  FILE  WITH  END  OF  PAGE  ERROR. 

*  CZ1103A  FROM  CHECKFILE;  END  OP  PAGE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK_PILE;  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  THIS  LINE  WILL  CONTAIN  AN  @. 

-  CZ1103A  BEGIN  TEST  WITH  FILE  WITH  END  OP  PILE  ERROR. 

*  CZ1103A  FROM  CHECK_FILE;  END  OF  FILE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK_FILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR;  THIS  LINE  WILL  CONTAIN  AN  X. 

-  CZ1103A  BEGIN  TEST  WITH  FILE  WITH  INCORRECT  DATA. 

*  CZ1103A  FROM  CHECK_FILE;  PILE  DOES  NOT  CONTAIN  CORRECT  OUTPUT  - 

EXPECTED  C  -  GOT  I. 

-  CZ1103A  FROM  CHECK_FILE;  UST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR;  LINE  WITH  C. 

****  CZ1103A  FAILED  ********************. 
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VERSION  DESCRIPTION  DOCUMENT 
FOR  THE 

Ada  COMPILER  VALIDATION  CAPABILITY 
(Version  1.10) 


1  VERSION  IDENTIFICATION 

This  document  describes  the  Ada  Compiler  Validation  Capability 
(ACVC),  Version  1.10.  This  version  consists  of  3719  tests  in  4l82  test 
files.  Also,  there  are  three  units  in  four  files  and  three  tests  in  three 
files  which  support  the  running  of  the  ACVC  tests;  one  data  file 
containing  macro  definitions;  one  program  in  one  file  for  making  the  macro 
substitutions;  and  five  programs  in  165  files  which  are  used  to  aid  in  the 
validation  process.  The  differences  between  Version  1.9  and  1.10  are 
detailed  in  sections  2.0  throu^  4.0. 


2  TEST  MODIFICATIONS 

In  Version  1.10  of  the  ACVC,  384  tests  were  modified  from  the 
corresponding  tests  in  Version  1.9.  Modifications  have  been  made: 

a)  to  correct  tests  that  were  found  to  be  Incorrect  in  previous 
versions  of  the  ACVC, 

b)  to  strengthen  the  tests  by  making  the  tests  more  comprehensive 
or  by  incorporating  more  cases  to  check,  and 

c)  to  bring  test  code  into  conformance  with  the  coding  standards. 

The  following  tests  have  been  modified  from  Version  1.9: 


A28004A.ADA  A35902C.ADA  A74106C.ADA 
AE3101A.ADA  B22003A.ADA  B23003F.TST 
B24204B.ADA  B24204C.ADA  B28001J.ADA 
B28001S.ADA  B28001T.ADA  B28003A.ADA 
B2A003B.ADA  B2A003C.ADA  B33301A.ADA 
B37201A.ADA  ,B37312B.ADA  B39004G.ADA 
B39004L.ADA  "=>--844001  A.  ADA  B49006A.ADA 
B59001A.ADA  B64001A.ADA  B67001A.ADA 
B67001C.ADA  B67001D.ADA  B85013C.ADA 
B91001H.ADA  B91003B.ADA  B95001A.ADA 
B97101E.ADA  B97102C.ADA  B97102E.ADA 
BC3604A.ADA  C32001B.ADA  C32111A.ADA 
C32112B.ADA  C32113A.ADA  C32115A.ADA 
C34007A.ADA  C34007D.ADA  C34007G.ADA 
C34007P.ADA  C34007S.ADA  C34012A.ADA 
C35502F.TST  C35502K.ADA  C35502N.DEP 
C35503C.ADA  C35503D.TST  C35503E.ADA 
C355030.ADA  C35503H.ADA  C35503K.ADA 
C355030.ADA  C35503P.ADA  C35505C.ADA 
C35507E.ADA  C35507G.ADA  C35507H.ADA 


ADI  A0 1  A. ADA 
B24204A.ADA 
B28001R.ADA 
B2A003A.ADA 
B36001A.ADA 
B39004J.ADA 
B49009A.ADA 
B67001B.ADA 
B86001B.ADA 
B97101A.ADA 
BC3105A.ADA 
C32112A.ADA 
C34004A.ADA 
C34007M.ADA 
C35102A.ADA 
C35502P.ADA 
C35503F.TST 
C35503L.ADA 
C35507C.ADA 
C35507I.DEP 


C35507J.DEP  C35507K.ADA 

C35508E.ADA  C35508G.ADA 

C355080.ADA  C35508P.ADA 

C35802Y.DEP  C35802Z.DEP 

C35A06N.ADA  C36204B.ADA 

C37206A.ADA  C37207A.ADA 

C37213J.ADA  C37215C.ADA 

C37215H.ADA  C38102C.ADA 

C4 1308c. ADA  C41320A.ADA 

C42007G.ADA  C45242B.ADA 

C45332A.ADA  C45532B.DEP 

C45532N.DEP  C45614C.DEP 

C45621I.DEP  C45621J.DEP 

C45621M.DEP  C45621N.DEP 

C45621Q.DEP  C45621R.DEP 

C45621U.DEP  C45621V.DEP 

C45621Y.DEP  C45621Z.DEP 

C47008A.ADA  C47009A.ADA 

C52104L.ADA  C54A24B.ADA 

C64103F.ADA  C64104a.ADA 

C64104J.ADA  C64104k.ADA 

C64109I.ADA  C64109J.ADA 

C85018B.ADA  C87B04B.ADA 

C94002G.ADA  C96001A.ADA 

CC1221A.ADA  CC1311A.ADA 

CE2102A.ADA  CE2102B.ADA 

CE2102E.ADA  CE2102F,ADA 

CE2102I.ADA  CE2102J.ADA 

CE2103B.TST  CE2104A.ADA 

CE2104D.ADA  CE2105A.ADA 

CE2 106b. ADA  CE2107A.ADA 

CE2107D.ADA  CE2107E.ADA 

CE2107H.ADA  CE2107I.ADA 

CE2 108c. ADA  CE2108D.ADA 

CE21G9C.ADA  CE2110A.ADA 

CE2111A.ADA  CE2111B.ADA 

CE2111E.ADA  CE2111G.ADA 

CE2115B.ADA  CE2201A.ADA 

CE2201F.ADA  CE2201G.ADA 

CE2204A.ADA  CE2208B.ADA 

CE2401C.ADA  CE2401E.ADA 

CE2402A.ADA  CE2404A.ADA 

CE2407A. ADA  ,  CE2408A. ADA 
CE2411A.ADA  'CE3002B.TST 

CE3102B.TST  CE3103A.ADA 

CE3108A.ADA  CE3108B.ADA 

CE3111A.ADA  CE3111B.ADA 

CE3111E.ADA  CE3112A.ADA 

CE3114B.ADA  CE3115A.ADA 


C35507M.DEP  C35507N.DEP 

C35508H.ADA  C35508J.DEP 

C35703A.ADA  C35711B.ADA 

C35904A.ADA  C35904B.ADA 

C36204C.ADA  C37107A.ADA 

C37209B.ADA  C37213H.ADA 

C37215E.ADA  C37215G.ADA 

C39005A.ADA  C41307D.ADA 

C4 1402 A. ADA  C42007F.ADA 

C45252B.ADA  C45273A.ADA 

C45532F.DEP  C45532J.DEP 

C45621G.DEP  C45621H.DEP 

C45621K.DEP  C45621L.DEP 

C456210.DEP  C45621P.DEP 

C45621S.DEP  C45621T.DEP 

C45621W.DEP  C45621X.DEP 

C46014A.ADA  C47005A.ADA 

C47009B.ADA  C4A012B.ADA 

C64103B.ADA  C64103E.ADA 

C64104H.ADA  C64l04l.ADA 

C641040.ADA  C64109H.ADA 

C64109K.ADA  C64109L.ADA 

C87B06A.ADA  C87B19A.ADA 

C97301B.ADA  C99004A.ADA 

CC1311B.ADA  CC3603A.ADA 

CE2102C.TST  CE2102D.ADA 

CE2102G.ADA  CE2102H.TST 

CE2102K.ADA  CE2103A.TST 

CE2104B.ADA  CE2104C.ADA 

CE2105B.ADA  CE2106A.ADA 

CE2107B.ADA  CE2107C.ADA 

CE2107F.ADA  CE2107G.ADA 

CE2108A.ADA  CE2108B.ADA 

CE2109A.ADA  CE2109B.ADA 

CE2110B.ADA  CE2110C.ADA 

CE2111C.ADA  CE2111D.ADA 

CE2111H.ADA  CE2115A.ADA 

CE2201B.ADA  CE2201C.ADA 

CE2201M.ADA  CE2202A.ADA 

CE2401A.ADA  CE2401B.ADA 

CE2401F.ADA  CE2401H.ADA 

CE2405B.ADA  CE2406A.ADA 

CE2409A.ADA  CE2410A.ADA 

CE3002C.TST  CE3102A.ADA 

CE3104A.ADA  CE3107A.TST 

CE3109A.ADA  CE3110A.ADA 

CE3111C.ADA  CE3111D.ADA 

CE3112B.ADA  CE3114A.ADA 

CE3206A.ADA  CE3208A.ADA 
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CE3301A.ADA  CE3302A.ADA  CE3303A.ADA  CE3305A.ADA 
CE3402A.ADA  CE3402C.ADA  CE3402D.ADA  CE3402E.ADA 
CE3403A.ADA  CE3403B.ADA  CE3403C.ADA  CE3403D.ADA 
CE3403E.ADA  CE3403F.ADA  CE3404A.ADA  CE3404B.ADA 
CE3404C.ADA  CE3405A.ADA  CE3405C.ADA  CE3405D.ADA 
CE3406A.ADA  CE3406B.ADA  CE3406C.ADA  CE3406D.ADA 
CE3407A.ADA  CE3407B.ADA  CE3407C.ADA  CE3408A.ADA 
CE3408B.ADA  CE3408C.ADA  CE3409A.ADA  CE3409B.ADA 
CE3409C.ADA  CE3409D.ADA  CE3409E.ADA  CE3410A.ADA 
CE3410B.ADA  CE3410C.ADA  CE3410D.ADA  CE3410E.ADA 
CE3411A.ADA  CE3411C.ADA  CE3412A.ADA  CE3413A.ADA 
CE3413C.ADA  CE3601A.ADA  CE3602A.ADA  CE3602B.ADA 
CE3602C.ADA  CE3602D.ADA  CE3603A.ADA  CE3604A.ADA 
CE3605A.ADA  CE3605B.ADA  CE3605C.ADA  CE3605D.ADA 
CE3605E.ADA  CE3606A.ADA  CE3606B.ADA  CE3701A.ADA 
CE3704A.ADA  CE3704B.ADA  CE3704C.ADA  CE3704D.ADA 
CE3704E.ADA  CE3704F.ADA  CE3704M.ADA  CE3704N.ADA 
CE37040.ADA  CE3706C.ADA  CE3706D.ADA  CE3706F.ADA 
CE3706G.ADA  CE3707A.ADA  CE3708A.ADA  CE38OIA.ADA 
CE3804A.ADA  CE3804B.ADA  CE380UC.ADA  CE3804D.ADA 
CE3804E.ADA  CE3804F.ADA  CE3804G.ADA  CE3804I.ADA 
CE3804K.ADA  CE3804M.ADA  CE3805A.ADA  CE3805B.ADA 
CE3806A.ADA  CE3806C.ADA  CE3806D.ADA  CE3806E.AI)A 
CE3809A.ADA  CE3809B.ADA  CE3810A.ADA  CE3901A.ADA 
CE3905A.ADA  CE3905B.ADA  CE3905C.ADA  CE3905L,ADA 
CE3906A.ADA  CE3906B.ADA  CE3906C.ADA  CE3906D.ADA 
CE3906E.ADA  CE3906F.ADA  CE3908A.ADA  E28005C.AI)A 

In  addition,  the  following  support  files  and  tests  for  support 
were  modified  for  Version  1.10: 


MACRO. DFS 
CZ1102.ADA 


REPSPEC.ADA 


REPBODY . ADA 


CZ1 101A.ADA 


3  TEST  DELETIONS 


The  following  26  tests  appear  in  ACVC  Version  1.9,  but  not  in  ACVC 
Version  1.10.  Several  of  the  deleted  tests  were  renamed  to  new  test  names 
in  ACVC  1.10  to  conform  to  the  naming  conventions  provided  by  the 
Implementer's  Guide  or  to  reflect  a  change  in  teat  class. 


A37312A.ADA 

B34001S.ADA 

BC10AGA.ADA 

C910BDA.ADA 

CE3203A.ADA 

CE3405B.ADA 

E24101A.TST 


A41307A.ADA 

B86001C.DEP 

C35A03E.ADA 

C910BDB.ADA 

CE3301B.ADA 

CE3409F.ADA 

E66001D.ADA 


A41307C.ADA 

B86001D.TST 

C35A03R.ADA 

C950CHC.ADA 

CE3301C.ADA 

CE3410F.ADA 


B33006B.ADA 

B97102A.ADA 

C900ACA.ADA 

CE2210A.ADA 

CE3402B.ADA 

CE3412C.ADA 


4  NEW  TESTS 

The  following  623  teats  have  been  added  to  Version  1.10  of  the  ACVC  Test 
Suite.  A  test  is  considered  "new"  if  the  test  name  did  not  exist  in  ACVC 
Version  1.9*  Several  of  the  new  testa  were  renamed  from  former  tests  in 
ACVC  Version  1.9  to  conform  to  the  naming  conventions  provided  by  the 
Implementer’s  Guide  or  to  reflect  a  change  in  test  class. 


A980QU.ADA 

AD1C04D,DEP 

AD3015F.DEP 

AD7005A.ADA 

AD7102A.ADA 

B22003B.ADA 

B2A003D.ADA 

B33301B.ADA 

B34005K.ADA 

B34006B.ADA 

B34014B.ADA 

B34014K.ADA 

B34014S.ADA 

B37201B.ADA 

B64001B.ADA 

B67001I.ADA 

B86001C.ADA 

B86001G.ADA 

B86001K.ADA 

B860010.ADA 

B86001S.ADA 

B86001W.DEP 

B91003E.ADA 

B97101G.ADA 

BD5001A.ADA 


AD1009M.DEP 
AD3014C.DEP 
AD3015H.DEP 
AD7006A.ADA 
AD7103A.ADA 
B24204D.ADA 
B2A003E.ADA 
B34005B.ADA 
B34005N.ADA 
B34006E.ADA 
B34014D.ADA 
B34014M.ADA 
B34014V.ADA 
B37212B.ADA 
B64110A.ADA 
-B67001 J.ADA 
B86001D.ADA 
B86001H.ADA 
B86001L.ADA 
B86001P.ADA 
B86001T.DEP 
B86001X.TST 
B95001C.ADA 
B97101H.ADA 
BD5002A.ADA 


ADI 009V. DEP 
AD3014F.DEP 
AD3015K.DEP 
ADT101A.ADA 
AD7103C.ADA 
B24204E.ADA 
B2A003F.ADA 
B34005E.ADA 
B34005Q.ADA 
B34006H.ADA 
B34014F.ADA 
B340140.ADA 
B34014X.ADA 
B41307B.ADA 
B66001D.ADA 
B6 700 IK. ADA 
B86001E.ADA 
B86001I.ADA 
B86001M.ADA 
B86001Q.ADA 
B86001U.DEP 
B86001Y.TST 
B95069D.ADA 
BC3102C.ADA 
BD5002B.ADA 


AD1009W.DEP 

AD3015C.DEP 

AD7001B.ADA 

AD7101C.ADA 

AD7104A.ADA 

B24204F.ADA 

B33002A.ADA 

B34005H.ADA 

B34005T.ADA 

B34006K.ADA 

B34014I.ADA 

B34014Q.ADA 

B34014Z.ADA 

B44001B.ADA 

B67001H.ADA 

B85013D.ADA 

B86001F.ADA 

B86001J.ADA 

B86001N.ADA 

B86001R.ADA 

B86001V.DEP 

B86001Z.TST 

B95069E.ADA 

BC3123C.ADA 

BD5002C.ADA 
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BD5002D.ADA 

BD5002E.ADA 

BD5002F.ADA 

BD5006B.ADA 

BD5006C.ADA 

BD5006D.ADA 

i 

BD5008A.ADA 

BD5101A.ADA 

BD5101B.ADA 

1 

BD5103A.ADA 

BD5104A.ADA 

BE3301G.ADA 

:§ 
V  1 

C32115B.ADA 

C34004C.ADA 

G34005A.ADA 

C34005D.ADA 

C34005F.ADA 

G34005G.ADA 

S* 

C34005J.ADA 

C34005L.ADA 

G34005M.ADA 

C34006A.ADA 

C34006D.ADA 

G34006F.ADA 

i 

C34009A.ADA 

C34014A.ADA 

G34014G.ADA 

p 

C34014G.ADA 

C34014H.ADA 

G34014J.ADA 

^  ' 

C34014N.ADA 

C34014P.ADA 

G34014R.ADA 

k/’. 

C34014U.ADA 

C34014W.ADA 

G34014Y.ADA 

^V 

C35505F.ADA 

C35A060.ADA 

G35A06P.ADA 

K-: 

C35A06R.ADA 

C35A06S.ADA 

G37213K.ADA 

C37312A.ADA 

C41307A.ADA 

G41307G.ADA 

B 

C91004B.ADA 

C91004C.ADA 

G95040B.ADA 

C98001C.ADA 

CC1221B.ADA 

GG1221G.ADA 

CC 1223 A. ADA 

CC3123A.ADA 

GG3123B.ADA 

kv 

CC3125C.ADA 

CC3125D.ADA 

GG3126A.ADA 

CC3220A.ADA 

CC3221A.ADA 

GG3222A.ADA 

CC3606A.ADA 

CD1009A.DEP 

GD1009B.DEP 

■ 

CD1009D.DEP 

CD1009E.DEP 

GD1009F.DEP 

CD1009H.DEP 

GDI  0091. DEP 

GD1009J.DEP 

CD1009L.DEP 

GD1009N.DEP 

GD10090.DEP 

CD1009Q.DEP 

GD1009R.DEP 

GD1009S.DEP 

*  , 

GDI  0090. DEP 

GD1009X.DEP 

GD1009Y.DEP 

a 

CD1C03A.DEP 

GD1G03B.ADA 

GD1G03G.TST 

CD1C03F.DEP 

GD1G03G.DEP 

GD1G03H.DEP 

CD1C04A.DEP 

CD1G04B.DEP 

GD1G04G.DEP 

CD1C06A,DEP 

GD1D01A.ADA 

GD1D01B.ADA 

V. 

CD1D01D.ADA 

CD1D02A.ADA 

CD1D03A. ADA 

CD2A21B,DEP 

GD2A21G.DEP 

GD2A21D.DEP 

a 

CD2A22A.DEP 

GD2A22B.DEP 

GD2A22G.DEP 

CD2A22E.DEP 

GD2A22F.DEP 

GD2A22G.DEP 

CD2A22I.DEP 

GD2A22J.DEP 

GD2A23A.DEP 

CD2A23C.DEP 

GD2A23D.DEP 

CD2A23E.DEP 

CD2A24B.DEP 

GD2A24G.DEP 

GD2A24D.DEP 

» ■ 

CD2A24F.DEP 

GD2A24G.DEP 

GD2A24H.DEP 

L  ^ 

CD2A24J.DEP 

GD2A31A.DEP 

GD2A31B.DEP 

1 

CD2A31D.DEP 

GD2A32A.DEP 

GD2A32B.DEP 

p 

CD2A32D.DEP 

CD2A32E.DEP 

GD2A32F.DEP 

i-:- 

CD2A32H.DEP 

GD2A32I.DEP 

GD2A32J.DEP 

CD2A41B.DEP 

^"a)2A4lG.DEP 

GD2A41D.DEP 

v‘- 

CD2A42A.DEP 

GD2A42B.nEP 

GD2A42G.DEP 

CD2A42E.DEP 

GD2A42F.DEP 

GD2A42G.DEP 

r‘ 

CD2A42I.DEP 

GD2A42J.DEP 

GD2A5U.DEP 

CD2A51C.DEP 

GD2A51D.DEP 

GD2A51E.DEP 

CD2A52B.DEP 

GD2A52G.DEP 

GD2A52D.DEP 

CD2A52H.DEP 

GD2A52I.DEP 

GD2A52.T.DEP 

P 

CD2A53B.DEP 

GD2A53G.DEP 

GD2A53D.DEP 

CD2A54A.DEP 

GD2A54B.DEP 

GD2A54G.DEP 

£ 

CD2A54G.DEP 

GD2A54H.DEP 

GD2A54I,DEP 

5 

BD5005B.ADA 

BD5006J.ADA 

BD5102A.ADA 

C32111B.ADA 

C34005C.ADA 

C34005I.ADA 

C340050.ADA 

C34007J.ADA 

C34014E.ADA 

C34014L.ADA 

C34014T.ADA 

C35505E.ADA 

C35A06Q.ADA 

C37213L.ADA 

C41309A.ADA 

C98001B.ADA 

CC1221D.ADA 

CC3125B.ADA 

CC3127A.ADA 

CC3223A.ADA 

CD1009C.DEP 

CD1009G.DEP 

CD1009K.DEP 

CD1009P.DEP 

CD1009T.DEP 

CD1009Z.DEP 

CD1C03E.DEP 

CD1C03I.ADA 

CD1C04E.DEP 

CD1D01C.ADA 

CD2A2U.DEP 

CD2A21E.DEP 

CD2A22D.DEP 

CD2A22H.DEP 

CD2A23B.DEP 

CD2A24A.DEP 

CD2A24E.DEP 

CD2A24I.DEP 

CD2A31C.DEP 

CD2A32C.DEP 

CD2A32G.DEP 

CD2A41A.DEP 

CD2A41E.DEP 

CD2A42D.DEP 

CD2A42H.DEP 

CD2A51B.DEP 

CD2A52A.DEP 

CD2A52G.DEP 

CD2A53A.DEP 

CD2A53E.DEP 

CD2A54D.DEP 

CD2A54J.DEP 


i 


.y. 


y:'. 


yrj'. 


■Tii*  wC* A.'  «*■  V..' 


/  <' 


k  ' 

I 


t- 


» 


CD2A61A.DEP 

CD2A61E.DE3> 

CD2A61I.DEP 

CD2A62A.DEP 

CD2A63A.DEP 

CD2A64A.DEP 

CD2A65A.DEP 

CD2A66A.DEP 

CD2A71A.DEP 

CD2A72A.DEP 

CD2A73A.DEP 

CD2A74A.DEP 

CD2A75A.DEP 

CD2A76A.DEP 

CD2A81A.TST 

CD2A81E.TST 

CD2A83B.TST 

CD2A83G.TST 

CD2A84E.DEP 

CD2A84I.DEP 

CD2A84N.DEP 

CD2A91C.TST 

CD2B11B.DEP 

CD2B11F.DEP 

CD2B16A.DEP 

CD2C11D.DEP 

CD2D13A.DEP 

CD3014E.DEP 

CD3015E.DEP 

CD3015L.DEP 

CD4051A.DEP 

CD5003B.DEP 

CD5003F.DEP 

CD5007B.DEP 

CD5011D.DEP 

CD5011H.DEP 

00501 1M.DEP 

CD5011R.DEP 

CD5012C.DEP 

CD5012G.DEP 

CD5012L.DEP 

CD5013C.DEP 

CD5013G.DEP 

CD5013L.DEP 

CD5Q13R.DEP 

CD5014C.DEP 

CD5014G.DEP 

CD5014K.DEP 

CD5014O.DEP 

CD5014O.DEP 

CD50l4r.BEP 

CD7004C.TST 


CD2A61B.DEP 
CD2A61F.DEP 
CD2A61J.DEP 
CD2A62B.DEP 
CD2A63B.DEP 
CD2A64B.DEP 
CD2A65B.DEP 
CD2A66B.DEP 
CD2A71B.DEP 
CD2A72B.DEP 
CD2A73B.DEP 
CD2A74B.DEP 
CD2A75B.DEP 
CD2A76B.DEP 
CD2AaiB.TST 
CD2A81F.TST 
CD2A83C.TST 
CD2A84B.DEP 
CD2A84F.DEP 
CD2A84K.DEP 
CD2A87A.TST 
CD2A91D.TST 
CD2B11C.DEP 
CD2B11G.DEP 
CD2C11A.DEP 
CD2C11E.DEP 
CD3014A.DEP 
CD3015A.DEP 
CD3015G.DEP 
CD3021A.DEP 
CD4051B.DEP 
CD5003C.DEP 
CD5003G .DEP 
CD5011A.DEP 
CD5011E.DEP 
CD5011I.DEP 
CD5011N.DEP 
CD5011S.DEP 
CD5012D.DEP 
CD5012H.DEP 
CD5012M.DEP 
,^CD5013D.DEP 
CT5013H.DEP 
CD5013M.DEP 
CD5013S.DEP 
CD5014D.DEP 
CD5014H.DEP 
CD5014L.DEP 
CD5014R.DEP 
CD5014V.DEP 
0)501 4Z. DEP 
CD7004D.TST 


CD2A61C.DEP 

CD2A61G.DEP 

CD2A61K.DEP 

CD2A62C.DEP 

0)2A63C.DEP 

CD2A64C.DEP 

0)2A65C.DEP 

CD2A66C.DEP 

CD2A71C.DEP 

CD2A72C.DEP 

CD2A73C.DEP 

CD2A74C.DEP 

CD2A75C.DEP 

CD2A76C.DEP 

O02A81C.TST 

CD2A81G.TST 

CD2A83E.TST 

CD2A84C.DEP 

CD2A84G.DEP 

CD2A84L.DEP 

CD2A91A.TST 

CD2A91E.TST 

CD2B11D.DEP 

CD2B15B.DEP 

CD2C11B.DEP 

CD2D11A.DEP 

CD3014B.DEP 

CD3015B.DEP 

CD3015I.DEP 

CD4031A.DEP 

CD4051C.DEP 

CD5003D.DEP 

CD5003H.DEP 

CD5011B.DBP 

CD501 1F.DEP 

CD5011K.DEP 

0)501 10. DEP 

CD5012A.DEP 

CD5012E.DEP 

CD5012I.DEP 

CD5013A.DEP 

CD5013E.DEP 

CD5013I.DEP 

CD5013N.DEP 

00501 4A.DEP 

CD5014E.DEP 

O)50l4l.DEP 

CD5014M.DEP 

0)501 4S. DEP 

CD5014W.DEP 

0)7003A.TST 

CD7005B.TST 


CD2A61D.DEP 

CD2A61H.DEP 

CD2A61L.DEP 

CD2A62D.DEP 

CD2A63D.DEP 

CD2A64D.DEP 

CD2A65D.DEP 

CD2A66D.DEP 

0)2A71D.DEP 

CD2A72D.DEP 

CD2A73D.DEP 

CD2A74D.DEP 

0)2A75D.DEP 

CD2A76D.DEP 

0)2A81D.TST 

CD2A83A. TST 

0)2A83F.TST 

CD2A84D.DEP 

0)2A84H.DEP 

CD2A84M.DEP 

CD2A91B.TST 

CD2A95A.TST 

CD2B11E.DEP 

CD2B15C.DEP 

0)2C11C.DEP 

CD2D11B.DEP 

O)30l4D.DEP 

CD3015D.DEP 

CD3015J.DEP 

CD4041A.DEP 

0)4051D.DEP 

CD5003E.DEP 

0)50031. DEP 

CD5011C.DEP 

0)501 1G.DEP 

CD5011L.DEP 

0)501  IQ. DEP 

CD5012B.DEP 

0)501 2F. DEP 

CD5012J.DEP 

CD5013B.DEP 

CD5013F.DEP 

0)501 3K. DEP 

CD50130.DEP 

0)501 4B. DEP 

CD5014F.DEP 

0)501 4J. DEP 

CD5014N.DEP 

0)50141. DEP 

CD5014X.DEP 

0)7004A.TST 

CD7005E.TST 
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CD7006B.TST 

CD7101B.TST 

CD7101G.TST 

CD7104B.TST 

CD7204C.DEP 

CE2102M.ADA 

CE2102Q.ADA 

CE2102U.ADA 

CE2102Y.ADA 

CE2108E.ADA 

CE2110D.ADA 

CE2201I.ADA 

CE2201M.ADA 

CE2205A.ADA 

CE2401L.ADA 

CE2409B.ADA 

CE3102F.ADA 

CE3102J.ADA 

CE3107B.ADA 

CE3411B.ADA 

CE3804J.ADA 

CE3804P.ADA 

CE3806H.ADA 

ED2A26A.DEP 

ED7005C.TST 

EE3203A.ADA 

EE3409F.ADA 


CD7006E.TST 

CD7101D.ADA 

CD7102B.TST 

CD7105A.ADA 

CD7205C.DEP 

CE2102N.ADA 

CE2102R.ADA 

CE2102V.ADA 

CE2103C.ADA 

CE2108F.ADA 

CE2111F.ADA 

CE2201J.ADA 

CE2201N.ADA 

CE2401I.ADA 

CE2404B.ADA 

CE2410B,ADA 

CE3102G.ADA 

CE3102K.ADA 

CE3112C.ADA 

CE3604B.ADA 

CE3804L.ADA 

CE3806B.ADA 

CE3810B.ADA 

ED2A56A.DEP 

ED7005D.TST 

EE3301B.ADA 

EE3410F.ADA 


CD7007B.ADA 

CD7101E.DEP 

Cri7103B.TST 

CD7203B.ADA 

CD7205D.DEP 

CE21020.ADA 

CE2102S.Ar)A 

CE2102W.ADA 

CE2103D.ADA 

CE2108G.ADA 

CE2111I.ADA 

CE2201K.ADA 

CE2204C.ADA 

CE2401J.ADA 

CE2407B.ADA 

CE3102D.ADA 

CE3102H.ADA 

CE3104B.ADA 

CE3112D.ADA 

CE3801B.ADA 

CE3804N.ADA 

CE3806F.ADA 

E24201A.TST 

ED2A86A.TST 

ED7006C.TST 

EE3402B.ADA 

EE3412C.ADA 


CD7007C.TST 

CD7101F.DEP 

CD7103D.TST 

CD7204B.ADA 

CE2102L.ADA 

CE2102P.ADA 

CE2102T.ADA 

CE2102X.ADA 

CE2107L.ADA 

CE2108H.ADA 

CE2201H.ADA 

CE2201L.ADA 

CE2204D.ADA 

CE2401K.ADA 

CE2408B.ADA 

CE3102E.ADA 

CE3102I.ADA 

CE3104C.ADA 

CE3404D.ADA 

CE3804H.ADA 

CE38040.ADA 

CE3806G.ADA 

ED1D04A.DEP 

ED7004B.TST 

ED7006D.TST 

EE3405B.ADA 


In  addition,  one  new  support  unit  (in  one  file),  a  system  of  programs 
(in  165  files)  designed  to  aid  in  the  validation  process,  and  a  macro 
substitution  program  have  been  added  to  ACVC  Version  1.10: 

SPPRTI3.ADA  (The  specification  of  a  pacloge  whose  body  must  be 
provided  by  the  user.) 

AVAT  (One  package  in  files  DATSPEC.ADA  and  DATBODY.ADA; 

all  other  units  in  files  whose  names  have  the  form 
"AVATHtS -ext"  where  each  %  is  replaced  by  a  letter 
or  digit  and  "ext"  is  either  "ADA"  or  "TST".) 

MACROSUB  A  program  which  modifies  the  "TST"  tests  Inserting  the 

values  supplied  in  the  file  MACRO. DFS.  MACRO. DFS 
must  be  modified  to  reflect  the  implementation  dependent 
--values  of  the  compiler. 


ACVC  1.10  Tape  Information 


1  INTRODUCTION 

The  ACVC  1.10  test  files  are  written  on  one  tape  volume  in  VAX  VMS  BACKUP 
format.  One  of  the  files  on  this  tape  is  ACVCIO.LST,  which  contains  the  names 
of  all  tests  in  the  ACVC  test  suite. 


2  TAPE  FORMAT 

This  tape  was  written  using  the  BACKUP  utility  on  a  VAX-11/780.  The  VAX 
command  to  read  this  tape  is 

$  BACKUP/LOG  MF : ACVCIO . BCK/SAVESET  [directory  where  you  want  the  tests]*.*.* 
Note:  MF:  is  the  logical  name  for  the  tape  drive. 


3  TEST  MODIFICATIONS 

The  Ada  tests  will  be  periodically  updated  and  corrected.  Their 
correctness  is  not  guaranteed  either  by  the  ACVC  Maintenance  Organization 
(AMO)  or  by  its  contractor.  Please  report  errors  in  writing  to 

Mr.  Steven  P.  Wilson 

ACVC  Maintenance  Organization 

ASD/SCOL 

Ur igh t -Pa t terson  AFB,  OH  45433-6503 


You  will  receive  notification  of  changes  to  this  version  on  a  periodic 
basis.  Please  notify  the  AMO  of  any  change  of  address. 
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1  Scope. 

1.1  Identification. 

This  is  the  Ada  Compiler  Validation  Capability  (ACVC)  User's  Guide. 
This  document  details  the  use  of  Version  1.10  of  the  ACVC. 


1.2  Purpose. 

This  user's  guide  describes  the  ACVC  test  suite,  its  use,  and 
interpretation  of  the  test  results.  It  should  be  read  by  anyone  who  wishes 
to  use  the  ACVC  to  test  an  implementation  of  the  Ada  language. 


1.3  Introduction. 

The  primary  purpose  of  the  ACVC  is  to  help  decide  whether  an  Ada 

translator/compiler  conforms  to  ANSI/MIL-STD-1815A,  the  Reference  Manual 
for  the  Ada  Programming  Language  (RM).  The  RH  is  also  known  as  the  Ada 
Standard.  The  ACVC  is  maintained  by  the  ACVC  Maintenance  Organization 
(AMO)  under  the  direction  of  the  Ada  Validation  Office  (AVO)  of  the  Air 
Force's  Ada  Joint  Program  Office  (AJPO).  The  three  main  components  of  the 
ACVC  are: 

.  An  Implementers'  guide  that  describes  the  implementation 

implications  of  the  RM  and  the  conditions  that  are  checked  by  each 
validation  test  program. 

.  A  suite  of  validation  test  programs  that  are  submitted  to  a 

compiler. 

.  Validation  support  tools  that  assist  in  determining  system 

capabilities,  preparing  tests  for  compilation,  and  analyzing  the 
results  of  execution. 


2  References. 


ANSI/MIL-STD-1815A  (The  Reference  Manual  for  the  Ada  Programming 
Language),  22  January  1983. 

Ada  Compiler  Valuation  Procedures  and  Guidelines,  Ada  Joint 
Program  Office,-  1  January  1987. 

Ada  Compiler  Validation  Capability  Implementers'  Guide,  SofTech, 
Inc.^  1  December  1986. 

ACVC  Version  1.10  Version  Description  Document,  SofTech,  Inc., 

1  December  1987. 
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5.  ACVC  Test  Desimi  and  Coding  Standards,  SofTech,  Inc., 
1  December  198?. 


3  Instruction  For  Use. 

3.1  Ada  Compiler  Validation  Capability  Implementers'  Guide. 

All  of  the  ACVC  test  programs  are  based  on  objectives  given  in  the  Ada 
Compiler  Validation  Capability  Implementers'  Guide  (AIG).  The  AIG 
basically  follovs  the  RM.  However,  the  AIG  contains  additional  sections 
which  further  clarify  the  rules  of  the  language,  details  the  interpretation 
of  any  ambiguities  in  the  RM,  and  presents  objectives  and  guidelines  for 
the  tests. 


3  '  Validation  Test  Programs. 

The  ACVC  test  suite  is  composed  of  various  test  programs  designed  to 
ensure  that  a  compiler  correctly  conforms  to  all  aspects  of  the  RM.  The 
test  suite  also  attempts  to  ensure  that  the  implementation  does  not  add  any 
illegal  extentions  to  the  language. 

The  goals  of  the  ACVC  include: 

.  Maximizing  the  amount  of  information  derived  from  a  validation 
attempt;  in  particular,  identifying  as  many  nonconformances  as 
possible. 

.  Minimizing  the  effort  needed  to  test  a  compiler;  in  particular, 
the  effort  needed  to  a)  adapt  the  tests  to  a  particular  compiler 
environment,  and  b)  determine  which  tests  passed  and  which 
failed. 

.  Minimizing  the  effort  needed  to  determine  if  a  test  is  correct 
(that  is,  if  it  uses  an  appropriate  algorithm  to  check  the 
objective)  when  failed  on  a  compiler. 

.  A  thorough  coverage  of  the  language  and  the  possible 
implementations  of  its  features. 

.  Making  the  tests  understandable  and  maintainable. 
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3.2.1  Test  Naming  Conventions. 

Test  names  have  the  form  <name>.<type>.  The  <name>  component  is 
composed  of  seven  to  nine  characters.  The  interpretation  of  each  character 
is  described  belov,  where  the  first  column  indicates  the  character 
position(s)  and  the  second  column  gives  the  corresponding  meaning: 

1  Test  classification  (letter)  -  identifies  the  class  of  the 
test  (see  Classifications). 

2  AIG  chapter  (hexadecimal)  -  identifies  the  chapter  which 
contains  the  objective  being  tested. 

3  Section  (hexadecimal)  -  Identifies  the  section  within  the 
above  chapter. 

4  Sub-section  (alpha-numeric)  -  identifies  the  sub-section 
within  the  above  section. 

5,  6  Test  objective  (decimal)  -  identifies  the  objective,  within 
the  above  sub-section,  being  tested. 

7  Sub-objective  (letter)  -  indicates  a  sub-objective  of  the 
above  objective. 

8  Compilation  sequence  (alpha-numeric)  -  indicates  the 
compilation  order  of  multiple  files  that  comprise  a  single 
test  (0  is  compiled  first).  This  position  is  present  only  if 
the  test  is  composed  of  multiple  files. 

9  Main  subprogram  indication  (character  'H')  -  indicates  which 
file  of  a  test  set  contains  the  main  procedure.  This  position 
is  present  only  for  one  file  of  a  multi-file  test. 


The  <type>  component  is  a  three-character  extension  which  identifies 
the  type  of  the  test  (see  Type  Extensions). 

Characters  2-7  of  the  <name>  component  uniquely  identify  every  test 
objective.  Each  individual  objective  has  only  a  single  classification  and 
type  designation  associated  with  it.  The  classification  and  type  of  a  test 
indicates  its  expected  compilation/execution  results. 


3.2. 1.1  Classifications. 

The  test  classifications  are  A,  B,  C,  D,  E,  and  L.  Tests  that  come 
under  classes  A,  C,  D,  and  E  are  also  considered  executable  tests. 


3. 2. 1.1.1  Class  A. 

Class  A  tests  ensure  acceptance  (compilation)  of  certain  language 
constructs  which  cannot  be  verified  at  run  time.  There  are  no  testing 
conditions  within  them.  These  tests  are  expected  to  execute  successfully  - 
they  simply  report  'PASSED'.  An  Implementation  is  considered  to  have 
failed  any  test  for  which  it  does  not  indicate  otherwise. 
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3. 2. 1.1. 2  Class  B. 

Class  B  tests  check  that  illegal  constructs  are  caught  and  that  there 
are  no  illegal  extentions  to  the  language.  These  tests  are  expected  to 
fail  compilation.  They  are  graded  as  'PASSED'  if  all  of  the  indicated 
errors  in  the  test  are  caught  and  no  legal  constructs  are  rejected.  An 
implementation  is  considered  to  have  failed  any  test  for  which  an  error  is 
not  caught  or  a  legal  construct  is  rejected. 

Lines  containing  errors  which  must  be  caught  are  marked  ' —  ERROR:'. 
This  error  comment  may  also  include  a  very  brief  indication  of  what  makes 
the  construct  illegal.  Lines  containing  legal  constructs  which  must  be 
accepted  are  marked  ' —  OK.'. 

The  following  rules  apply  in  satisfying  the  pass  criteria: 

.  The  compiler  rejects  a  test  which  contains  only  a  single  error. 

.  The  compiler  displays  an  error  message  for  all  of  the  ' —  ERROR:' 
indications  in  a  test  with  multiple  errors. 

.  All  lines  marked  ' —  OK.'  are  accepted. 

.  Split  tests  can  be  created  (see  Modifying  Tests). 


3. 2. 1.1. 3  Class  C. 

Class  C  tests  check  the  run-time  system  and  ensure  that  verifiable 
constructs  are  implemented  correctly.  These  tests  are  expected  to  execute. 
The  tests  will  indicate  either  'PASSED',  'FAILED',  or  'NOTAPPLICABLE' 
based  on  the  conditions  tested.  An  implementation  is  considered  to  have 
failed  any  test  for  which  it  does  not  indicate  otherwise. 


3.2. 1.1.4  Class  D. 

Class  D  tests  are  capacity  tests.  These  tests  are  expected  to  execute 
successfully  if  no  errors  are  reported  during  compilation.  If  an  error  Is 
reported  during  compilation,  it  must  be  an  error  associated  with  the 
capacity  being  tested,  in  which  case  the  test  is  considered  Inapplicable- 
Otherwise,  an  implementation  may  be  considered  to  have  failed  any  test  for 
which  it  does  not  indicate  differently;  such  failure  should  be  reported  to 
the  AVO  for  a  ruling. 
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at  execution  time.  These  criteria  are  compared  to  the  comments  to  make  a 
grading  determination.  An  Implementation  is  considered  to  have  failed  any 
test  for  which  it  does  not  indicate  otherwise. 


3. 2. 1.1. 6  Class  L. 

Class  L  tests  ensure  that  all  library  unit  dependencies  within  a 
program  are  satisfied  before  said  program  can  be  linked  and  executed,  and  | 

that  circularity  among  units  is  not  allowed.  These  tests  are  expected  to  j 

fail  at  link  time;  however,  failure  to  compile  may  be  acceptable  for  some 
implementations.  These  tests  are  graded  as  'PASSED'  if  they  do  not 
successfully  complete  the  link  phase.  Any  test  which  begins  execution  is 
graded  as  'FAIIED'. 

For  tests  which  might  possibly  fail  at  compile  time,  the  lines  I 

containing  the  illegal  constructs  are  marked  ' —  ERROR:'. 


3. 2. 1.2  Type  Extensions. 

The  type  extensions  and  their  meanings  are: 

ADA  -  These  tests  check  the  standard  features  of  the  language  that 
must  be  implemented  by  all  compilers.  They  are  expected  to  be 
compiled/executed  unmodified  and  must  be  successfully  processed 
by  all  implementations. 

DEP  -  These  tests  involve  optional,  implementation-dependent  features 
of  the  language.  Each  test  concerned  with  supported  features 
must  be  successfully  processed  as  indicated  by  its 

classification.  Tests  concerned  with  unsupported  features  are 
considered  inapplicable,  provided  they  are  processed  as 

described  below: 

.  Class  B  tests  should  be  successfully  compiled. 

Executable  tests  must  be  rejected  at  compile  time  as 
described  in  the  test's  applicability  criteria. 

TST  -  These  tests  also  check  implementation-dependent  features  of  the 
language.  They  contain  macros  for  the  substitution  of  certain 
implementation-dependent  values  (see  Macro  Substitutions). 
Generally,  each  of  these  tests  is  expected  to  be  successfully 
processed  as  indicated  by  its  classification.  However,  some  of 
the  tests  may  be  concerned  with  unsupported  features  and 
therefore  are  treated  as  described  for  DEP  tests. 


1.2.2  Coding  Standards. 

To  help  meet  the  goals  of  the  ACVC,  certain  coding  standards  are 
followed. 
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3. 2. 2.1  General. 

Some  general  test  writing  standards  include: 

.  Tests  are  written  using  the  basic  55-character  character-set  (26 
capital  letters,  10  digits,  and  19  punctuation  marks). 

.  Maximum  line  length  is  72  characters,  except  as  noted  In  certain 
OEP  and  TST  tests. 

.  Numeric  values  are  generally  in  the  range  (-128.. 127).  However, 
if  necessary,  they  can  be  within  the  range  (-2048. . 2047) ,  a 
maximum  o£  12  bits. 

.  Tests  are  written  using  as  few  Ada  features  as  are  necessary  to 
write  a  self-checking  executable  test  that  is  not  too  difficult  to 
read  or  modify. 

To  help  ensure  a  thorough  coverage  of  the  language,  and  to  promote 
understandability  and  maintainability,  many  objectives  are  divided  into 
sub-objectives,  with  some  checked  in  a  single  test  file  and  others  checked 
in  separate  test  files.  For  example,  if  a  test  objective  is  concerned  with 
some  property  of  scalar  types,  then  individual  subtests  check: 

.  INTEGER,  CHARACTER,  BOOLEAN,  and  a  user-defined  enumeration  type, 
all  in  one  test  file  since  we  expect  all  of  these  types  to  be 
implemented. 

.  FLOAT  and  a  user-defined  floating-point  type  In  a  separate  test 
file. 

.  A  fixed-point  type  in  another  separate  test  file. 

Sub-objectives  which  are  difficult  to  test  are  also  tested  in  separate 
tests  files. 


3. 2. 2. 2  Header  Format. 

The  following  header  is  placed  at  the  beginning  of  all  new  and 
modified  tests: 

—  filename. 

—  OBJECTIVE: 


—  SEPARATE  FILES: 


—  APPLICABILITY  CRITERIA: 
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—  PASS/FAIL  CRITERIA: 


—  MACRO  SUBSTITUTIONS: 


—  HISTORY: 

ccc  nun/dd/yy  comment  about  change. 


The  purpose  of  each  section  is: 

filename  -  identical  to  the  actual  name  of  the  file. 

objective  -  describes  the  test's  objective  and  explains 

the  exact  conditions  or  sub-objectives 
presently  being  tested. 

separate  files  -  identifies  all  of  the  component  files  of  a 

multiple  file  test,  with  a  brief  description 
of  each  file. 

applicability  criteria  -  details  under  what  conditions  the  test  can  be 

ruled  inapplicable. 

pass/fail  criteria  -  explains  how  to  interpret  the  run-time 

results  for  grading  the  test. 

macro  substitution  -  identifies  the  macros  in  the  test  which  must 

be  substituted  and  a  brief  description  of 
what  the  replacement  value  represents. 

history  -  details  who  has  made  changes  to  the  test, 

when,  and  what  those  changes  were. 

The  file  name,  objective  and  history  sections  are  always  present.  The 
separate  files,  applicability  criteria,  pass/fail  criteria  and  macro 
substitutions  sections  are  present  only  for  tests  which  have  such 
conditions. 


3. 2. 2. 3  Test  Body  Format. 


Note:  test  body  refers  to  the  code  which  Is  compiled/executed  and  is 
not  necessarily  .synonymous  with  an  Ada  unit  body. 

Tne  names  of  all  library  units  correspond  to  the  name  of  the  test  to 
which  they  are  associated. 

Class  ?  tests  are  generally  library  procedures.  Other  units  a:e  used 
when  required  by  the  objective,  in  which  case  there  is  not  necessarily  a 
main  subprogram. 
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The  main  subprogram  of  all  executable  tests  is  a  procedure.  The  name 
of  this  procedure  is  identical  to  the  name  of  the  test. 
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3. 2. 2. 3.1  Test  Ini tlallzatlon/Reporting  And  Test  Objective  Blocks. 

The  test  body  of  an  executable  test  has  the  folloving  logical 
execution  sequence: 

1.  Call  to  REPORT. TEST,  which  prints  the  test  identifier  and 
description. 

2.  Elaboration  of  objective-related  declarations. 

3.  Testing  of  the  objective  -  calls  to  REPORT. FAILED  and 
REPORT. N0T_APPLI CABLE  as  appropriate. 

4.  Call  to  REPORT. RESULT,  which  prints  the  pass/fail  message. 

The  tests  generally  consist  of  a  single  procedure  with  the  objective  being 
tested  within  an  inner  DECLARE  block.  If  the  test  objective  is  divided 
into  multiple  sub-objectives,  each  sub-objective  is  tested  within  a 
separate  DECLARE  block.  For  objectives  which  require  packages  as  library 
units,  package  declarations  and  elaborations  are  arranged  to  result  in  the 
previously  described  execution  sequence. 


3. 2. 2. 3. 2  Ada  Unit  Bodies. 

The  format  of  the  statements  and  language  constructs  is  designed  to 
make  the  syntactic  and  semantic  structure  of  the  test  program  apparent.  In 
an  attempt  to  defeat  high-quality  optimizing  compilers,  which  may  execute 
or  remove  the  critical  portion  of  a  test  at  compile  time,  certain  coding 
practices  have  been  devised.  These  practices  include  calling  identity 
functions,  using  objects  in  statements  which  appear  to  have  no 
significance,  and  using  IF-THEN-ELSE  statements  Instead  of  just  a  simple  IF 
statement . 


3.2.3  Macro  Substitutions. 

TST  type  tests  contain  macros  which  represent  implementation-dependent 
characteristics  of  the  language.  The  macros  are  given  as  identifiers  which 
begin  with  a  dollar  sign  ($).  Each  macro  must  be  replaced  with  an 
appropriate  textual  value  to  make  the  tests  suitable  for  compilation. 

The  substitutions  can  be  done  automatically  by  using  the  MACROSUBS 
program  distributed  with  the  ACVC.  This  program  will  request  the 
replacement  value  for  each  macro  and  then  edit  all  the  TST  tests  in  the 
suite  to  make  the  substitution. 

Appendix  A  contains  a  description  of  all  of  the  macros  used  in  the 
test  suite. 
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3.2.4  Processing  The  ACVC  Test  Programs. 

Processing  of  the  test  suite  consists  of: 

1.  Compiling  class  B  tests. 

2.  Compiling  and  linking  class  L  tests. 

3.  Compiling,  linking,  and  executing  class  A,  C,  D,  and  E  tests. 

It  is  recommended  that  the  suite  be  processed  by  chapter.  Generally,  the 
test  suite  is  processed  within  a  single  program  library  which  must  be 
initialized  as  described  below. 


3. 2.4.1  Prerequisites. 

The  following  prerequisites  must  be  met  before  processing  the  test 
suite: 

1.  All  of  Ada  must  be  Implemented  -  the  test  suite  attempts  to  cover 
the  entire  Ada  language. 

2.  The  support  package  REPORT  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Package  Report). 

3.  The  support  procedure  CHECKFILE  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Procedure  Checkfile). 

4.  The  support  package  SPPRT13  must  be  compiled  and  loaded  into  the 
program  library  (see  Package  Spprtl3). 


3.2.4. 2  Dependencies  Among  Tests. 

Test  files  which  use  character  position  8  (compilation  sequence)  in 
their  names  have  an  inherent  dependency.  These  test  files  must  be  compiled 
successively  and,  for  class  A,  C,  0,  E,  and  L  tests,  linked  together. 

Some  of  the  executable  file  I/O  tests  create  a  data  file  that  Is  to  be 
used  by  a  subsequent  test.  In  these  instances,  the  tests  must  be  run  in 
sequence,  without  deleting  the  data  file  that  was  created.  The  test;;  vhirh 
create  such  a  file,  and  the  tests  that  depend  on  that  file  are; 

CE2108A  must  be  followed  by  CE2108B. 

CE2108C  must  be  followed  by  CE2in8D. 

CE3112A  must  be  followed  by  CE3112B. 
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3. 2. 4. 3  Test  Applicability. 

Certain  tests  in  the  suite  are  concerned  with  optional, 
implementation-dependent  features  of  the  language.  Hence,  some  of  these 
tests  may  not  be  applicable  to  all  implementations.  The  applicability  of 
each  test  is  based  on  the  criteria  given  in  the  test  file.  The  handling  of 
tests  concerned  with  unsupported  features  is  described  above  under  Type 
Extensions. 

For  executable  tests,  lines  containing  these  implementation-dependent 
features  are  marked  " —  NA  ->  ERROR.".  If  an  implementation  does  not 
support  the  specified  feature,  then  these  constructs  must  be  rejected.  If 
the  constructs  so  indicated  are  rejected,  then  the  test  is  considered 
inapplicable  -  any  other  errors  reported  are  ignored.  If  the  constructs  so 
indicated  are  not  rejected,  then  the  test  remains  applicable  and  must 
execute  successfully. 

All  the  implementation-dependent  tests  are  compiled,  and  executed  if 
compiled  successfully,  during  a  validation  attempt  -  except  those  tests 
vhlch  require  a  floating-point  DIGITS  value  that  exceeds  SYSTEM. HAX_DIGITS. 
All  results  for  a  particular  feature  must  be  consistent  (l.e.,  all  'PASSED' 
or  all  'NOT- APPLICABLE'). 

Appendix  B  contains  the  test  applicability  criteria  for  all  the 
implementation-dependent  tests. 


3. 2. 4. 4  Test  Disputes. 

The  Certification  Body  has  defined  "dispute"  to  mean: 

For  the  purposes  of  validation,  a  dispute  is  constituted  by  any 
behavior  of  the  candidate  Ada  implementation  that  is  not 
explicitly  permitted  by  the  code  of  the  ACVC  tests,  by  the 
documentation  from  the  AMO  that  accompanies  the  ACVC  tapes,  nr  hy 
other  documentation  provided  to  the  vendor  by  the  Ada  Validation 
Facility  ( AVF ) . 

IMsputes  must  be  brought  to  the  attention  of  the  AVF  as  soon  as  possible  'o 
that  the-'  can  be  resolved  by  the  AVF  and  AVO.  A  dispute  related  to  ^ 
validation  attempt  should  be  sent  to  the  AVF  handling  the  va.ihati^r 
'her  disputes  of  ACVC  rests  car  he  sent  to  the  AHO . 


.  iideiines  For  H^difylng  Tests. 
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.  Adding  a  length  clause  to  alter  the  default  size  of  a  collection. 

.  Creating  split  tests. 

.  Confirming  that  messages  produced  by  an  executable  test 
demonstrate  conforming  behavior  that  wasn't  anticipated  by  the 
test  (such  as  raising  one  exception  instead  of  another). 

No  original  test  can  be  modified;  copies  must  be  made.  It  is 
recommended  that  the  copies  be  named  by  appending  an  alpha-numeric 
character  to  the  <name>  portion  of  the  original  test  file.  If  possible, 
the  line  numbers  of  the  original  test  should  remain  intact. 

Split  tests  can  be  created  for  class  B  and  L  tests.  Split  tests  have 
certain  lines  commented  out  to  facilitate  catching  any  previously 
undetected  errors.  Split  tests  can  also  be  used  to  ensure  that  all  legal 
constructs  are  passed. 


3.3  Validation  Support  Tools. 

The  following  validation  tools  are  used  to  a)  provide  additional 
information  about  an  implementation,  and  b)  reduce  the  effort  required  to 
perform  a  validation  attempt. 


3.3.1  The  Ada  Validation  Assistant  Tool. 

3. 3. 1.1  Description. 

The  Ada  Validation  Assistant  Tool  (AVAT)  is  a  set  of  five  programs 
that  test  implementation-dependent  features  and  produce  lists  of  possibly 
inapplicable  tests.  Although  it  is  not  part  of  the  test  suite,  the  AVAT 
system  can  assist  in  the  validation  process  by  providing  information  about 
the  implementation. 

AVAT  attempts  to  determine  whether  certain  features  of  the  language 
are  supported  by  the  implementation.  These  features  include  predefined 
types  other  than  those  required  by  the  language  and  certain  forms  of 
representation  clauses.  AVAT  also  attempts  to  measure  the  degree  to  which 
some  features  are  supported,  including  fixed-  and  floating-point  precision, 
and  compilation  of  generic  specifications  and  bodies  in  separate  files. 
Finally,  AVAT  reports  the  values  of  many  implementation-dependent  values, 
including  integer  type  bounds,  real  type  accuracies  and  ranges,  and  the 
constants  declared  in  the  package  SYSTEM. 

For  the  features  of  the  language  that  are  not  (fully)  supported,  th-? 
AVAT  programs  reoort  lists  of  ACVC  tests  that  might  be  inapplicable  due  to 
the  lack  of  (full*  support.  These  lists  may  not  be  complete;  that  is, 
there  may  be  unlisted  tests  which  are  Inapplicable  due  to  an 

mplemen t a t ion ' s  lack  of  support  for  a  particular  feature.  Likewise,  the 
lists  may  not  b»  entirely  accurate  for  a  particular  implementation;  that 
is,  due  to  implementation  decisions  not  anticipated  by  AVAT's  designers,  a 
test  may  be  listed  when  it  is  actually  applicable  to  the  implementation. 
The  final  determination  of  the  applicability  of  a  test  depends  on  the 
specific  criteria  given  in  the  text  of  the  test,  the  agreement  of  test 
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results  with  the  vendor's  documentation,  and,  in  some  cases,  the  vendor's 
explanation  of  unusual  test  results.  It  is  the  vendor's  responsibility  to 
reconcile  any  inconsistencies;  for  validation  purposes,  justification  of 
inconsistencies  must  be  provided  to  the  AVF  in  the  form  of  a  test  dispute. 

Each  AVAT  program  consists  of  a  data  collection  and  reporting  package 
(common  to  the  five  AVAT  programs),  a  number  of  auxiliary  library 

procedures,  and  a  main  procedure  which  imports  the  package  and  invokes  the 
auxiliary  procedures.  Some  of  the  auxiliary  procedures  simply  provide 
section  headers  for  the  report,  and  others  provide  the  values  of 

system-defined  constants.  The  remaining  procedures  (the  majority)  are  used 
to  determine  whether  specific  language  features  are  supported.  There  are 
two  or  more  versions  of  each  such  procedure.  For  example,  the  procedure 

which  tests  for  support  of  'SIZE  clauses  for  integer  types  occurs  in  four 

versions.  The  first  version  contains  no  'SIZE  clauses;  if  it  is  executed, 
it  stores  (in  a  structure  declared  in  the  package)  a  message  that  'SIZE 
clauses  are  not  supported  for  integer  types,  and  a  list  of  ACVC  tests  that 
are  therefore  potentially  inapplicable.  The  second  version  contains  a 
'SIZE  clause  specifying  the  implementation's  default  size;  if  it  executes, 
it  stores  a  message  that  only  default  size  specifications  are  accepted,  and 
a  corresponding  list  of  potentially  inapplicable  ACVC  tests.  Likewise,  the 
third  and  fourth  versions  contain  intermediate  and  minimal  size 
specifications  and  store  corresponding  messages  and  lists  of  tests.  The 
four  versions  of  the  procedure  must  be  submitted  to  the  compiler  in  the 
given  order.  The  last  one  to  successfully  compile  will  be  the  version 
Invoked  when  the  main  program  executes;  thus  the  appropriate  message  and 
test  list  will  be  reported. 

The  AVAT  programs  are  organized  as  follows: 

COMMON  PACKAGE  DATACOLLECTION 

This  package  collects  and  reports  the  messages  and  lists  of 
potentially  Inapplicable  tests. 

Specification  DATSPEC.ADA 

Body  DATBODY.ADA 

PART  ONE  AVATNUM 

This  program  reports  on  numeric  type  declarations  and 
characteristics. 

Main  procedure,'  AVATNUM. ADA 

Auxiliary  procedures  AVATOOO.ADA  ..  AVAT006.ADA 

AVAT007.TST 

AVAT008.ADA  ..  AVAT012.ADA 

AVAT013.TST 

AVAT014.ADA 

AVAT015.TST 

AVAT016.ADA  ..  AVAT026.ADA 
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PART  TWO  AVATLEN 

This  program  reports  on  the  support  for  length  clauses. 

Main  procedure  AVATLEN. ADA 

Auxiliary  procedures  AVATIOO.ADA  ..  AVAT134.ADA 

AVAT135.TST 

AVAT136.ADA 

AVAT137.TST 

AVAT138.ADA  ..  AVAT154.AOA 
PART  THREE  AVATREP 

This  program  reports  on  the  support  for  enumeration  and  record 
representation  clauses  and  address  clauses.  Some  of  the 
auxiliary  procedures  in  this  program  depend  on  the  support 
package  SPPRT13. 

Main  procedure  AVATREP. ADA 

Auxiliary  procedures  AVAT200.ADA  ..  AVAT227.ADA 

PART  FOUR  AVATGEN 

This  program  reports  on  the  support  for  separate  compilation  of 
generic  specifications,  bodies,  and  subunits,  and  for  file  I/O. 

Main  procedure  AVATGEN. ADA 

Auxiliary  procedures  AVAT300.ADA  ..  AVAT335.ADA 

PART  FIVE  AVATSTD 

This  program  reports  the  values  of  constants  and  type 
characteristics  in  the  packages  STANDARD  and  SYSTEM. 

Main  procedure  AVATSTD. ADA 

Auxiliary  procedures  AVAT400.ADA  ..  AVAT411.ADA 


3. 3. 1.2  Compilation. 

The  five  programs  that  make  up  AVAT  may  be  processed  in  any  order; 
however,  the  order  of  compilation  within  each  program  is  crucial.  The 
specification  of  package  DATACOLLECTION  must  be  compiled  as  the  first  unit 
in  each  program;  the  ..body,  of  course,  may  be  compiled  at  any  subsequent 
time  before  the  link  sfep.  The  auxiliary  procedures  must  be  compiled  after 
the  package  and  before  the  main  procedure,  since  they  import  the  package 
and  the  main  procedure  imports  the  auxiliary  procedures.  It  is  especially 
important  to  note  that  the  auxiliary  procedures  must  be  compiled  in  the 
order  given  by  their  file  names,  since  the  success  of  the  programs  depends 
on  the  required  library  management.  Note  that  this  compilation  order 
requirement  prohibits  the  use  of  any  sort  of  concurrent  or  interleaved 
compilation.  Including  the  use  of  batch  queues  with  more  than  one  job 
running  at  the  same  time. 
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3. 3. 1.3  Interpretation  Of  Results. 

When  the  five  AVAT  programs  execute,  they  report  the  values  of 
implementation-dependent  constants,  report  that  certain  features  are  (are 
not)  supported,  and  produce  lists  of  tests  which  are  potentially 
inapplicable  due  to  the  apparent  lack  of  support  of  certain  features.  The 
reports  should  be  read  and  carefully  considered  in  light  of  the  system 
documentation  and  known  implementation  decisions.  The  lists  of  potentially 
inapplicable  tests  serve  as  a  guide  in  determining  applicability,  but  final 
decisions  are  made  on  the  basis  of  test  behavior,  test-specific 
applicability  criteria,  and  consistency  with  documentation. 


3.3.2  Library  Support  Units. 

The  following  library  support  units  must  be  compiled  and  loaded  into 
the  program  library  that  is  used  when  compiling  and  linking  the  ACVC  tests. 


3.3.2. 1  Reporting  Test  Results. 

3. 3. 2. 1.1  Package  Report. 

All  executable  tests  use  the  REPORT  support  package.  This  package 
contains  routines  to  1)  automate  reporting  of  test  results  and  2)  help 
prevent  optimising  out  any  test  code.  Automation  of  reporting  test  results 
is  accomplished  with  a  set  of  procedures  which  identify  the  test  and 
indicate  its  result.  Optimization  is  defeated  with  a  set  of  identity 
functions. 

Package  REPORT  uses  most  of  the  Ada  features  used  throughout  the  test 
suite,  namely: 

type  INTEGER,  literals,  +,  -,  relations, 

type  CHARACTER,  literals,  &,  relations,  :> 

type  STRING,  literals,  &,  relations,  :* 

type  BOOLEAN,  literals,  AND,  OR,  NOT,  relations,  ;» 

user-defined  enumeration  type,  literals,  relations, 

object  declarations  (and  initialization)  for  the  above  types. 

subprogram  declarations,  bodies,  and  calls,  with  formal 
parameters  of  all.modes  and  of  the  above  types. 

IF  statements. 


Executable  tests  generally  follow  the  format: 

WITH  REPORT;  USE  REPORT; 

PROCEDURE  Test name  IS 


BEGIN 


ACVC  User's  Guide  (ACVC  Version  1.10) 


TEST  ("Testname",  "Description 
•  •  • 

IF  ...  /-  CorrectValue  THEN 
FAILED  ("Reason"); 

END  IF; 

RESULT; 

END  Test name; 

The  specification  of  package  REPORT  is  given  in  the  file  REPSPEC.ADA. 
The  body  of  package  REPORT  is  given  in  the  file  REPBODY.ADA.  The 
specification  and  body  of  package  REPORT  are  also  given  in  Appendix  C. 

The  acceptance  tests  CZIIOIA.ADA  and  CZ1102A.AOA  must  be  compiled  and 
executed  before  a  validation  attempt  to  ensure  correct  operation  of  REPORT. 
A  listing  of  the  output  for  CZIIOIA.ADA  is  given  in  Appendix  E. 


3.3.2. 1.2  Allowable  Modifications  To  Package  Report. 

Since  the  body  of  package  REPORT  is  independent  of  the  tests 
themselves,  it  can  be  modified  to  use  only  those  implementation  features 
that  are  actually  working.  Modifications  made  for  a  validation  attempt 
must  be  presented  to  the  AVF. 


3. 3. 2. 2  File  I/O. 

3. 3. 2. 2.1  Procedure  CheckFile. 

Some  of  the  executable  flle-I/0  tests  (CE...  tests)  use  a  checking 
procedure  called  CHECKFILE.  CHECKFILE  is  used  to  determine  the 
implementation's  text  file  characteristics. 

The  source  code  for  this  procedure  is  found  in  the  file  CHECKFILE. ADA. 
The  body  of  procedure  CHECKFILE  is  also  given  in  Appendix  D. 

The  acceptance  test  CZ1103A.ADA  must  be  compiled  and  executed  before  a 
validation  attempt  to  ensure  correct  operation  of  CHECKFILE.  CZ1103A 
checks  that  errors  in  text  files  are  properly  detected;  therefore,  CZ1103A 
will  print  some  failure  messages  when  it  is  executed.  The  presence  of 
these  messages  does  not  mean  the  test  has  failed.  A  listing  of  the  output 
for  CZ1103A.ADA  is  given  in  Appendix  E. 


3. 3. 2. 3  Address  Clauses. 

3. 3. 2. 3.1  Package  Spprtl3. 

Package  SPPRT13  contains  functions  which  return  values  of  type 
SYSTEM. ADDRESS  for  use  in  ADDRESS  clauses.  Only  the  specification  of  this 
package  is  distributed  with  the  ACVC;  the  body  must  be  supplied  by  the 
implementer.  Spprtl3  is  required  for  running  test  B9i001H.AOA,  many 
chapter  13  tests  (CD...  tests),  and  AVAT. 
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3. 3. 2. 3. 2  Allowable  Modifications  To  Package  Spprtl3. 

If  the  type  SYSTEM. ADDRESS  is  defined  to  be  static,  then  the  functions 
in  package  SPPRT13  can  be  replaced  with  constants.  Modifications  made  for 
a  validation  attempt  must  be  presented  to  the  AVF. 
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APPENDIX  A 


Macros  and  Their  Descriptions 


Following  is  the  information  contained  in  the  MACRO. DPS  file, 
macro  definition  includes: 


1.  The  macro  Itself. 


2.  A  description  of  what  the  replacement  value  represents. 


3.  A  list  of  tests  which  depend  on  the  macro. 


4.  An  example  replacement  value. 


—  $MAX  IN  LEN 

—  AN  INTEGER  LITERAL  GIVING  THE  MAXIMUM  LENGTH  PERMITTED  BY  THE 

—  COMPILER  FOR  A  LINE  OF  ADA  SOURCE  CODE  (NOT  INCLUDING  AN  END-OF-LINE 

—  CHARACTER). 

—  USED  IN;  A26007A 

MAX  IN  LEN  60 


—  $BIG_ID1 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX  IN  LEN. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003D  B23003E  C23(503G 

C23003H  C23003I  C23003J  C35502D  C35502F 

BIG  IDl 

AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAAl 


—  $BIG_ID2 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN_LEN, 

—  DIFFERING  FROM  $BIG  IDl  ONLY  IN  THE  LAST  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003F  C23003G  C23003H 

C23003I  C23003J 

BIG_ID2 

AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA2 
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Macros  and  Their  Descriptions 


—  $BIG  ID3 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OP  CHARACTERS  IS  $MAX  IN  LEN. 

—  USED  IN:  C23003A  C23003B  C23003C  C23003G  C23003H  C23503I 

C23003J 


BIG  ID3 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA3AAAAAAAAA  AAAAAAAAA  AAAAAAAAAA 


—  $BIG  ID4 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX  INLEN, 

—  DIFFERING  FROM  $BIG_ID3  ONLY  IN  THE  MIDDLE  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  C23003G  C23003H  C23003I 

C23003J 


BIG  ID4 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA4AAAAAAAAA  AAAAAAAAA  AAAAAAAAAA 


—  $BIG_STRING1 

—  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG_STRING2 

—  ($BIG_STRING1  &  $BIG  STRING2)  PRODUCES  THE  IMAGE  OP  $BIG_ID1. 

—  USED  IN:  C35502D  C35502P 

BIGSTRINGl  "AAAAAAAAAAAAAAAAAAAAAAAAAAA" 

—  $BIG  STRING2 

—  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG  STRINGl 

—  (SBIGSTRINGl  &  $BIG  STRING2)  PRODUCES  THE  IMAGE  OP  $BIG_TD1. 

—  USED  IN:  C35502D  C35502F 

BIG_STRING2  "AAAAAAAAA_AAAAAAAAA_AAAAAAAAA1" 

—  $MAX  STRING_LITERAL 

—  A  STRING  LITERAL  CONSISTING  OP  SMAX  IN_LEN  CHARACTERS  (INCLUDING  THE 

—  QUOTE  CHARACTERS). 

—  USED  IN:  A26007A 
MAX  STRING_LITERAL 

’^CCCCCCC10CCCCCCCC20CCCCCCCC30CCCCCCCC40CCCCCCCC50CCCCCCCC59" 

—  $NEG  BASED_INT 

—  A  BASED_INTEGER  LITERAL  (PREFERABLY  BASE  8  OR  16)  WHOSE  HIGHEST  ORDER 

—  NON-ZERO  BIT  WOULD  FALL  IN  THE  SIGN  BIT  POSITION  OF  THE 

—  REPRESENTATION  FOR  SYSTEM. MAX  INT,  I.E.,  AN  ATTEMPT  TO  WRITE  A 

—  NEGATIVE  VALUED  LITERAL  SUCH  AS  -2  BY  TAKING  ADVANTAGE  OF  THE 

—  BIT  REPRESENTATION. 

—  USED  IN:  E24201A 

NEG_BASED_INT  16#FPPPPPFE# 

$BIG  INT_LIT 

—AN  INTEGER  LITERAL  WHOSE  VALUE  IS  298,  BUT  WHICH  HAS 

—  ($MAX_IN_LEN  -  3)  LEADING  ZEROES. 

—  USED  IN:  C24003A 
BIG  INTLIT 

000000000000000000000000000000000000000000000000000000000298 
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$BIG_REAL_LIT 

—  A  UNIVERSAL  REAL  LITERAL  WHOSE  VALUE  IS  690.0,  BUT  WHICH  HAS 

—  ($MAX_IN_LEil  -  5)  LEADING  ZEROES. 

—  USED  IN;  C24003B  C24003C 

BIGREALLIT 

0000000000000000000000000000000000000000000000000000000690 . 0 

—  $MAX_LEN_INT_BASED  LITERAL 

—  A  BASED  INTEGER  LITERAL  (USING  COLONS)  WHOSE  VALUE  IS  2:11:,  HAVING 

—  ($MAX_IN  LEN  -  5)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  FIRST  1. 

—  USED  IN;"  C2A009A 
MAXLEN  INT  BASED  LITERAL 

2 : OCOOOOOOOOOCOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOl 1 ; 

—  $MAX_LEN_REAL  BASED_LITERAL 

—  A  BASED  REAL  LITERAL  (USING  COLONS)  WHOSE  VALUE  IS  16:F.E:,  HAVING 

—  (SMAXIN  LEN  -  7)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  F. 

—  USED  IN:"  C2A009A 

MAX  LEN  REAL  BASED  LITERAL 

T6 : OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOF . E ; 

—  SBLANKS 

—  A  SEQUENCE  OP  ($MAX_IN  LEN  -  20)  BLANKS. 

—  USED  IN:  B22001A  B22501B  B22001C  B22001D  B22001E  B22001P 

B22001G  B22001I  B22001J  B22001K  B22001L  B22001M 

B22001N 

<  LIMITS  OP  SAMPLE  SHOWN  BY  ANGLE  BRACKETS  > 

BLANKS 

—  $MAX  DIGITS 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX  DIGITS. 

—  USED  IN:  B35701A  CD7102B 

MAXDIGITS  6 

—  SNAME 

—  THE  NAME  OF  A  PREDEFINED  INTEGER  TYPE  OTHER  THAN  INTEGER, 

—  SHORT_INTEGER,  OR  LONG_INTEGER. 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USB  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCH_TYPB  AVAILABLE.) 

—  USED  IN;  AVAT007  C452?1D  B8600TX 
NAME  TINY_INTEGER 

—  SPLOATNAME 

—  THE  NAME  OP  A  PREDEFINED  FLOATING  POINT  TYPE  OTHER  THAN  FLOAT, 

—  SHORTFLOAT,  OR  LONG  FLOAT.  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH 

—  TYPES  SHOULD  USE  AN  UNDEFINED  IDENTIFIER  SUCH  AS  NO  SUCHTYPE.) 

—  USED  IN:  AVAT013  B86001Y 

FLOAT  NAME  SHORT  SHORT  FLOAT 
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—  SFIXEDNAME 

—  THE  NAME  OF  A  PREDEFINED  FIXED  POINT  TYPE  OTHER  THAN  DURATION. 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USE  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCHTYPE.) 

—  USED  IN;  AVAT030  BSSOOIZ 

FIXED_NAME  NO_SUCH_FIXED_TYPE 

—  SINTEGER  FIRST 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  INTEGER' FIRST. 

—  USED  IN;  C35503F  B54B01B 

INTEGER_FIRST  -32_768 

—  $INTEGER_LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST. 

—  USED  IN;  C35503F  B45232A  B45B01B 

INTEGER_LAST  32_767 

—  $INTEGER_LAST_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST  +  1. 

—  USED  IN:  C45232A 
INTEGER_LAST_PLUS_1  32_768 

—  $MIN_INT 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  SYSTEM . MIN_INT . 

—  THE  LITERAL  MUST  NOT  CONTAIN  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  CD7101B 

MIN_INT  -2147483648 

—  $MAX_INT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX_INT. 

—  THE  LITERAL  MUST  NOT  INCLUDE  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  C4A007A  CD7101B 

MAX_INT  2147483647 

—  $MAX_INT_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX_I NT  +  1. 

—  USED  IN:  C45232A 

MAX_INT_PLUS_1  2_147_483_648 

—  $LESS  THAN  DURATION 

—  A  REAL  literal  (WITH  SIGN)  WHOSE  VALUE  (NOT  SUBJECT  TO 

—  ROUND-OFF  ERROR  IF^FOSSIBLE)  LIES  BETWEEN  DURATION' BASE' FIRST  AND 

—  DURATION' FIRST.  IF  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN 

—  DURATION' RANGE. 

—  USED  IN:  C96005B 

LESS  THAN  DURATION  -75  000.0 
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—  $GREATER_THAN  DURATION 

—  A  REAL  LITERAL  WHOSE  VALUE  (NOT  SUBJECT  TO  ROUND-OPP  ERROR 

—  IP  POSSIBLE)  LIES  BETWEEN  DURATION' BASE' LAST  AND  DURATION' LAST.  IP 

—  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN  DURATION 'RANGE. 

—  USED  IN:  C96005B 

GREATER_THAN_DURATI ON  7  5  000 . 0 

—  $LESS_THAN_DURATION_BASE  PIRST 

—  A  REAL  LITERAL  (WITH  SIGS)  WHOSE  VALUE  IS  LESS  THAN 

—  DURATION'BASE' PIRST. 

—  USED  IN:  C96005C 

LESS_THAN_DURATION_BASE_PIRST  -131_073 . 0 

—  $GREATER_THAN_DURATION_BASE_LAST 

—  A  REAL  LITERAL  WHOSE  VALUE  IS  GREATER  THAN  DURATION'BASE' LAST. 

—  USED  IN:  C96005C 

GREATER_THAN_DURATION_BASE_LAST  131_073 . 0 

—  $COUNT_LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  TEXT_IO . COUNT’ ' LAST . 

—  USED  IN:  CE3002B 

COUNT_LAST  32_767 

—  $PIELD_LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  TEXT_IO. PIELD' LAST. 

—  USED  IN:  CE3002C 

FIELD_LAST  32_767 

—  $ILLEGAL_EXTERNAL  FILE  NAMEl 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME  (E.G.,  TOO  LONG,  CONTAINING  INVALID 

—  CHARACTERS,  CONTAINING  WILD-CARD  CHARACTERS,  OR  SPECIFYING  A 

—  NONEXISTENT  DIRECTORY). 

—  USED  IN:  CE2103A  CE2102C  CE2102H  CE2103B  CE3102B  CE3107A 

I LLEGAL_EXTERNAL_FI LENAMEl  \NODIRECTOBY\FI LENAME 

—  $ILLEGAL_EXTERNAL_FILE_NAME2 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME,  DIFFERENT  FROM  $EXTERNAL_FILE_NAMEl . 

—  USED  IN:  CE2102C  CE2102H  CE2103A  CE2103B 

ILLEGAL_EXTERNAL_FILE_NAME2  THIS-FILE-NAME-IS-TOO-LONG-FOR-MY-SYSTEM 

—  $ACC_SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  MINIMUM  NUMBER  OF  BITS 

—  SUFFICIENT  TO  HOLD  ANY  VALUE  OP  AN  ACCESS  TYPE. 

—  USED  IN:  CD1C03C  CD2A81A  CD2A81B  CD2A81C  CD2A81D  CD2A81E 

CD2A81P  eD2A81G  CD2A83A  CD2A83B  CD2A83C  CD2A83E 

CD2A83P  CD2A83G  ED2A86A  CD2A87A 

ACC  SIZE  32 
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—  $TASK  SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  A  SINGLE  ENTRY  WITH  ONE  INOUT  PARAMETER. 

—  USED  IN:  CD2A91A  CD2A91B  CD2A91C  CD2A91D  CD2A91E 

TASK_SIZE  128 

—  $MIN_TASK_SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  NO  ENTRIES,  NO  DECLARATIONS,  AND  "NULL;" 

—  AS  THE  ONLY  STATEMENT  IN  ITS  BODY. 

—  USED  IN:  CD2A95A 

MIN_TASK_SIZE  64 

—  $NAME_LIST 

—  A  LIST  OP  THE  ENUMERATION  LITERALS  IN  THE  TYPE 

—  BY  COMMAS. 

—  USED  IN:  CD7003A 

NAME_LIST  OUR_VMS_ADA,  OUR_ULTRIX_ADA, 

—  SDEFAULT  SYS_NAME 

—  THE  VALUE  OF  THE  CONSTANT  SYSTEM . SYSTEM_NAME . 

—  USED  IN:  CD7004A  CD7004C  CD7004D 

DEFAULT_SYS_NAME  OUR_VMS_ADA 

—  $NEW_SYS_NAME 

—  A  VALUE  OF  THE  TYPE  SYSTEM. NAME,  OTHER  THAN  $DEFAULT_SYS  NAME.  IP 

—  THERE  IS  ONLY  ONE  VALUE  OP  THE  TYPE,  THEN  USE  THAT  VALUET 

—  NOTE:  IF  THERE  ARE  MORE  THAN  TWO  VALUES  OP  THE  TYPE,  THEN  THE 

PERTINENT  TESTS  ARE  TO  BE  RUN  ONCE  FOR  EACH  ALTERNATIVE. 

—  USED  IN:  ED7004B1 

NEW_SYS_NAME  OUR_ULTRIX_ADA 

—  $DEFAULT_STOR_UNIT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM . STORAGE_UNIT . 

—  USED  IN:  CD7005B  ED7005D3M  CD7005E 

DEFAULT_STOR_UNIT  16 

—  $NEV_STOR_UNIT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  STORAGE  UNIT,  OTHER  THAN  $DEFAULT_STOR_UNIT .  IF  THERE 

—  IS  :iO  OTHER  PERMITTED  VALUE,  THEN  USE  THE  VALUE  OP 

—  $ SYSTEM. STORAGE  UNIT.  IP  THERE  IS  MORE  THAN  ONE  ALTERNATIVE, 

—  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR  EACH  ALTERNATIVE. 

—  USED  IN:  ED7005C1  ED7005D1  CD7005E 

NEU_STOR_UNIT  8  . ' 

—  SDEFAULT  MEM_SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MEMORY_SIZE. 

—  USED  IN:  CD7006B  ED7006D3M  CD7006E 

DEFAULT  MEM  SIZE  655  360 


SYSTEM. NAME,  SEPARATED 

OUR  ELN  ADA 
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—  $NEW_MEM_SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  MEMORY_SIZE,  OTHER  THAN  $DEFAULT_MEM  SIZE.  IF  THERE  IS  NO 

—  OTHER  VALUE,  THEN  USE  $DEFAULT_MEM_SIZE.  IF  THERE  IS  MORE  THAN 

—  ONE  ALTERNATIVE,  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR 

—  EACH  ALTERNATIVE.  IF  THE  NUMBER  OF  PERMITTED  VALUES  IS  LARGE,  THEN 

—  SEVERAL  VALUES  SHOULD  BE  USED,  COVERING  A  VIDE  RANGE  OF 

—  POSSIBILITIES. 

—  USED  IN:  ED7006C1  ED7006D1  CD7006E 

NEW_MEM_SIZE  1_048_576 

—  $LOU_PRIORITY 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  LOWER  BOUND  OF  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

LOV_PRIORITY  0 

—  $HIGH_PRIORITY 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  UPPER  BOUND  OP  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

HIGH_PRIORITY  3 

~  $MANTISSA_DOC 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX_MANTISSA  AS  SPECIFIED 

—  IN  THE  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN;  CD7013B 

MANTISSA_DOC  31 

—  $DELTA  DOC 

—  A  REAL~LITERAL  WHOSE  VALUE  IS  SYSTEM. FINE_DELTA  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7013D 

DELTA_DOC  0. 000_000_000_465_661_287_307_739_558_602_5 

—  STICK 

—  A  REAL  LITERAL  WHOSE  VALUE  IS  SYSTEM. TICK  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN;  CD7104B 
TICK  0.001 
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Test  Applicability  Criteria 


Certain  tests  in  the  suite  may  be  considered  inapplicable  to  an 
implementation  depending  on  the  way  the  implementation  treats  the 
implementation-dependent  features  of  the  language.  A  brief  summary  of 
these  implementation-dependent  features  and  the  tests  they  affect  are 
listed  in  this  appendix. 

Note  that  the  applicability  of  each  one  of  these  tests  is  based  on  the 
criteria  listed  in  the  test  file.  All  potentially  inapplicable  tests  must 
still  be  compiled  -  except  those  tests  which  require  a  floating-point 
DIGITS  value  that  exceeds  SYSTEM . HAX__DIGITS  -  and  executed  if  successfully 
compiled,  to  verify  the  implementation's  treatment  of  these  features.  All 
results  for  a  particular  feature  must  be  consistent. 

The  first  part  of  this  appendix  is  concerned  with  tests  for  which  the 
applicability  is  determined  at  compile  time.  Class  B  tests  that  are 
inapplicable  should  be  successfully  compiled.  Executable  test  that  are 
inapplicable  must  be  rejected  at  compile  time  as  a  result  of  the 
unsupported  feature.  Lines  containing  the  implementation-dependent 
features  are  marked  " —  NA  ■>  ERROR.". 


If  the  type  SHORT_INTEGER  is  not  predefined,  then  the  following  tests 
are  inapplicable: 

B52004E.DEP  B55B09D.DEP  B86001V.DEP 
C45231B.DEP  C45304B.DEP  C45502B.DEP 
C45503B.DEP  .  C45504B.DEP  C45504E.DEP 
C45611B.DEP""  '  C45613B.DEP  C45614B.DBP 
C45631B.DEP  C45632B.DEP  C55B07B.DEP 
CD7101E.DEP 


B-1 


Compile  Time  Inapplicability 


If  the  type  LONG_INTEGER  is  not  predefined,  then  the  following  tests 
are  inapplicable! 


B52004D.DEP 

C45231C.DEP 

C45503C.DEP 

C45611C.DEP 

C45631C.DEP 

CD7101F.DEP 


B55B09C.DEP 

C45304C.DEP 

C45504C.DEP 

C45613C.DEP 

C45632C.DEP 


B86001V.DEP 

C45502C.DEP 

C45504F.DEP 

C45614C.DEP 

C55B07A.DEP 


If  the  type  SHORT_FLOAT  is  not  predefined,  then  the  following  tests 
are  inapplicable: 

B86001T.DEP  C35702A.DEP 


If  the  type  L0NG_FL0AT  is  not  predefined,  then  the  following  tests  are 
inapplicable: 

B86001U.DEP  C35702B.DEP 


If  there  are  no  predefined  integer  types  other  than  INTEGER, 
SHORT  INTEGER,  and  LONG_INTEGER,  then  the  following  tests  are 
inapplicable:  ~ 

B86001X.TST  C45231D.TST  CD7101G.TST 


If  there  are  no  predefined  floating-point  types  other  than  FLOAT, 
SHORT_FLOAT,  and  LONG_FLOAT,  then  the  following  test  is  inapplicable: 

B86001Z.TST 


If  there  are  no  predefined  fixed-point  types,  then  the  following  test 
is  inapplicable: 

B86001Y.TST 


If  'SIZE  representation  clauses  for  boolean  types  are  not  supported, 
then  the  following^tests  are  inapplicable: 

CD2A64A.DEP  CD2A64C.DEP  CD2A65A.DEP 

CD2A65C.DEP  CD2A74A.DEP  CD2A76A.DEP 
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If  'SIZE  representation  clauses  for  enumeration  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

A39005B.DEP  CD1009B.DEP  CD1009P.DEP 
CD2A21A.DEP  C02A21B.DEP  CD2A21C.DEP 
CD2A210.DEP  C02A21E.DBP  CD2A22A.DEP 
C02A22B.DEP  C02A22C.DEP  CD2A22D.DEP 
CD2A22E.DEP  C02A22F.0EP  CD2A22G.DEP 
CD2A22H.DEP  CD2A22I.DEP  CD2A22J.DBP 
CD2A23A.DEP  CD2A23B.OEP  CD2A23C.DEP 
CD2A23D.OEP  CD2A23E.DEP  CD2A24A.DBP 
CD2A24B.DEP  C02A24C.0EP  CD2A24D.OEP 
C02A24E.DEP  C02A24F.DEP  CD2a24G.DEP 
CD2A24H.DEP  CD2A24I.DEP  CD2A24J.DBP 
CD2A66B.OEP  CD2A66D.DEP  ED2A26A.OEP 


If  'SIZE  representation  clauses  for  integer  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

C87B62A.DEP  CD1009A.DEP  CD10090.DEP 
CD1C03A.DEP  CD1C04A.DEP  CD2A31A.DEP 
CD2A31B.OEP  CD2A31C.DEP  CD2A31D.DEP 
CD2A32A.DEP  CD2A32B.DEP  CD2A32C.DEP 
CD2A32D.DEP  CD2A32E.DEP  CD2A32F.DEP 
CD2A32G.DEP  CD2A32H.DEP  CD2A32I.DEP 
CD2A32J.DEP  CD2A64B.0EP  C02A64D.DEP 
CD2A65B.DEP  CD2A650.DEP  CD2A74B.DEP 
CD2A76B.DEP 


If  'SIZE  representation  clauses  for  floating-point  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

CD1009C.DEP  CD2A41A.DEP  CDZA41B.DEP 
CD2A41C.DEP  CD2A41D.DEP  CD2A41E.DEP 
CD2A42A.DEP  CD2A42B.DEP  CD2A42C.DEP 
C02A420.0EP  CD2A42E.DEP  CD2A42F.DEP 
CD2A42G.DEP  CD2A42H.DEP  CD2A42I.DEP 
CD2A42J.DEP 
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If  'SIZE  representation  clauses  for  fixed-point  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

CD1009D.DEP  CD1009Q.DEP  CD1C04C.DEP 
CD2A51B.DEP  CD2A51C.DEP  CD2A51D.DEP 
CD2A51E.DEP  CD2A52A.DEP  C02A52B.DEP 
CD2AS2C.DEP  CD2A520.0EP  CD2A52G.DEP 
CD2A52H.DEP  CD2A52I.DEP  CD2A52J.DEP 
CD2A53A.DEP  CD2A53B.DEP  CD2A53C.DEP 
C02A53D.0EP  CD2A53B.DEP  CD2A54A.DBP 
CD2A54B.DEP  C02A54C.DEP  C02A54D.DEP 
CD2A54G.DEP  C02A54H.DEP  C02A54I.DEP 
CD2A54 J . OEP  E02A56A . OEP 


If  'SIZE  representation  clauses  for  array  types  are  not  supported, 
then  the  following  tests  are  Inapplicable: 

CD1009E.DEP  CD1009F.DEP  CD2A61A.DEP 
C02A61B.DEP  CD2A61C.DEP  CD2A61D.DEP 
CD2A61E.DEP  CD2A61P.OEP  CD2A61G.DEP 
CD2A61H.0BP  C02A61I.0EP  CD2A61J.DEP 
C02A61K.0BP  C02A61L.DEP  C02A62A.DEP 
CD2A62B.DEP  CD2A62C.DEP  CD2A62D.DEP 
CD2A63A.OEP  CD2A63B.0EP  CD2A63C.DEP 
CD2A63D.OEP  CD2A64A.DEP  C02A64B.DEP 
CD2A64C.DEP  CD2A64D.DEP  CD2A65A.DEP 
CD2A65B.DEP  CD2A65C.DEP  CD2A65D.DEP 
CD2A66A.DEP  CD2A66B.DEP  CD2A66C.DEP 
C02A66D.DEP 


If  'SIZE  representation  clauses  for  record  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

CD1009G.DEP  CD2A71A,DEP  CD2A71B.DEP 
CD2A71C.DEP  CD2A71D.DEP  CD2A72A.DEP 
CD2A72B.DEP  CD2A72C.DEP  CD2A72D.DEP 
CD2A73A.DEP  CD2A73B.DEP  CD2A73C.DEP 
CD2A73D.DEP  CD2A74A.DEP  CD2A74B.DEP 
CD2A74C.DEP  CD2A74D.DEP  CD2A75A.DEP 
CD2A75B.DEP  CD2A75C.DEP  CD2A75D.DEP 
CD2A76A.OEP  C02A76B.DEP  CD2A76C.OEP 
CD2A76D.DEP 


If  'SIZE  representation  clauses  for  private  types  are  not  supported, 
then  the  following  test  is  Inapplicable: 


CD1009H.DEP 


Compile  Time 


If  'SIZE  representation  clauses  for  limited  private 
supported,  then  the  following  test  is  inapplicable: 

CD1009I.DEP 


If  'SIZE  representation  clauses  for  access  types  are 
then  the  following  tests  are  Inapplicable: 


CD2A81A.TST 

CD2A81D.TST 

CD2A81G.TST 

CD2A83C.TST 

CD2A83G.TST 

C02A84C.DEP 

C02A84F.DEP 

CD2A84I.DEP 

CD2A84H.DEP 

E02A86A.TST 


CD2A81B.TST 

CD2A81E.TST 

CD2A83A.TST 

CD2A83E.TST 

C02A84A.DEP 

C02A84D.DEP 

CD2A84G.DEP 

C02A84R.DEP 

C02A84N.0EP 


CD2A81C.TST 

CD2A81P.TST 

CD2A83B.TST 

CD2A83P.TST 

CD2A84B.DBP 

CD2A84B.DEP 

CD2A84H.DBP 

C02A84L.DEP 

CD2A87A.TST 


If  'SIZE  representation  clauses  for  task,  types  are  not 
the  following  tests  are  inapplicable: 

CD2A91A,TST  CD2A91B.TST  CD2A91C.TST 

CD2A91D.TST  CD2A91E.TST 


If  ' STORAGE_SIZE  representation  clauses  for  access 
supported,  Then  the  following  tests  are  inapplicable: 


A39005C.DEP 

CD1009R.DEP 

CD2A83A.TST 

CD2A83E.TST 

CD2A84A.DEP 

CD2A84D.DEP 

C02A84G.DEP 

CD2A84K.DEP 

CD2A84N.DEP 

CD2B11C.DEP 

CD2B11F.DEP 

CD2B15C.DEP 

ED2A86A.TST 


C87B62B.DEP 

CD1009S.DEP 

CD2A83B.TST 

CD2A83F.TST 

CD2A84B.DEP 

C02A84E.DEP 

C02A84H.0EP 

CD2A84L.DEP 

CD2B11A.DEP 

CD2B11D.DEP 

CD2B11G.DEP 

CD2B16A.DEP 


CD1009J.DEP 

CD1C03C.TST 

CD2A83C.TST 

CD2A83G.TST 

CD2A84C.DEP 

CD2A84F.DEP 

CDZA84I.DEP 

CDZA84M.DEP 

CD2B11B.DEP 

CD2B11E.DEP 

CD2B15B.DEP 

CD7205C.DEP 


If  'STORAGE  SIZE  representation  clauses  for  task 
supported,  tHen  the  following  tests  are  inapplicable: 


Inapplicability 
types  are  not 

not  supported, 


supported,  then 

types  are  not 


types  are  not 


A39005D.DEP 

CD1009T.DEP 

CD1C04B.DEP 


C87B62D.DEP 

CD1009U.DBP 

CD1C06A.DEP 


CD1009K.DEP 

CD1C03E.DEP 

CD7205D.DEP 


Compile  Time  Inapplicability 


If  the  'SHALL  clause  is  not  supported,  then  the  follovlng  tests  are 
inapplicable: 


A39005E.DEP 

CD1C03P.DEP 

CD2A53C.DEP 

CD2A54A.DEP 

CD2A54D.DEP 

CD2A54I.DEP 

CD2D11B.DEP 


C87B62C.DEP 

CD2A53A.DBP 

C02A53D.0EP 

CD2A54B.DEP 

CD2A54G.DEP 

CD2A54J.DEP 

CD2D13A.DBP 


CD1009L.DEP 

CD2A53B.OEP 

CD2A53E.DEP 

CD2A54C.DEP 

CD2A54H.DEP 

CD2D11A.DEP 

ED2AS6A.DBP 


If  enumeration  representation  clauses  are  not  supported,  then  the 
following  tests  are  Inapplicable: 


AD1009M.DEP  AD1009V.DEP  AD1009W.DBP 
AD1C04D.DBP  C35502N.DEP  C35507I.DEP 
C35507J.DEP  C35507M.DEP  C35507N.DBP 
C35508J.DEP  CD1C03G.DEP  CD2A23A.DBP 
CD2A23B.DBP  CD2A23C.DEP  CD2A23D.DBP 
C02A23B.DEP  CD2A24A.DEP  CD2A24B.DBP 
CD2A24C.DBP  C02A24D.DEP  CD2A24B.DBP 
CD2A24F.DBP  C02A24G.DEP  CD2A24H.0BP 
CD2A24I.DBP  CD2A24J.DEP  CD3021A.DEP 
E02A26A.DEP 


If  enumeration  representation  clauses  for  non-contiguous  values  are 
not  supported,  then  the  following  tests  are  inapplicable: 

A39005F.DEP  C35502I.DEP  C35502J.DEP 
C35502M,DEP  C35502N.DEP  C35507J.DEP 
C35507M.DEP  C35507N.DEP  C35508I.DEP 
C35508J.DEP  C35508M.DEP  C35508N.DEP 
C55B16A.DEP 


If  enumeration  representation  clauses  for  types  other  than  character 
and  boolean  are  not  supported,  then  the  following  tests  are 
inapplicable: 

A39005F.DEP  C35502I.DEP  C35502J.DBP 
C35502M.DEP  C35502N.DBP 


If  enumeration  representation  clauses  for  character  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

C35507I.DEP  C35507J.DEP  C35507M.DEP 

C35507N.DEP  C55B16A.DEP 
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Compile  Time  Inapplicability 


If  enumeration  representation  clauses  for  boolean  types,  with 
representation  values  other  than  (FALSE  «>  0,  TRUE  >>1),  are  not 
supported,  then  the  following  tests  are  inapplicable: 

C35508I.DEP  C35508J.DEP  C35508M.DEP 
C35508N.DEP 


If  record  representation  clauses  are  not  supported,  then  the  following 
tests  are  Inapplicable: 


A39005G.DEP 

CD1009Y.DEP 

CD1C04E.DEP 

CD4051B.DEP 

ED1D04A.DEP 


CD1009N.DEP 

CD1009Z.DEP 

CD4031A.DEP 

CD4051C.DEP 


CD1009X.DEP 

CD1C03H.DEP 

CD4051A.DEP 

CD7204C.DEP 


If  'ADDRESS  clauses  for  variables  are  not  supported,  or  if  the  type 
SYSTEH . ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 


CD5003B.DEP 

CD5003E.DEP 

CD5003H.DEP 

CD5011C.DEP 

CD5011I.DEP 

CD50110.DEP 

CD5012B.DEP 

CD5012I.DEP 

CD5013A.DEP 

CD5013G.DEP 

CD5013M.DEP 

CD5014A.DEP 

CD5014G.DEP 

CD5014M.DEP 

CD5014T.DEP 

CD5014Y.DEP 


CD5003C.DEP 

CD5003P.DEP 

CD5003I,DEP 

CD5011E.DEP 

CD5011K.DEP 

CD5011Q.DEP 

CD5012E.DEP 

CD5012J.DEP 

CD5013C.DEP 

CD5013I.DEP 

CD50130.DEP 

CD5014C.DEP 

CD5014I.DEP 

CD50140.DEP 

CD5014V.DEP 

CD5014Z.DEP 


CD5003D.DEP 

CD5003G.DEP 

CD5011A.DEP 

CD5011G.DEP 

CD5011M.DEP 

CD5012A.DEP 

CD5012P.DEP 

CD5012M.DBP 

CD5013B.DBP 

CD5013K.DEP 

CD5013S.DEP 

CD5014E.DEP 

CD5014K.DEP 

CD5014S.DEP 

CD5014X.DBP 


Compile  Time  Inapplicability 


If  'ADDRESS  clauses  for  constants  are  not  supported,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5011B.DEP  CD5011D.DEP  CD5011F.DEP 
CD5011H.DEP  CD5011L.DEP  CD5011N.DEP 
CD5011R.DEP  CD5011S.DEP  CD5012C.DEP 
CD5012D.DEP  CD5012G.DEP  CD5012H.DEP 
CD5012L.DEP  CD5013B.DEP  CD5013D.DEP 
CD5013F.DEP  CD5013H.DEP  CD5013J.DEP 
CD5013L.DEP  CD5013N.DEP  CD5013R.DEP 
CD5014B.DEP  CD5014D.DEP  CD5014P.DBP 
CD5014H.DEP  CD5014J.DEP  CD5014L.DEP 
CD5014N.DEP  CD5014R.DEP  CD5014U.DBP 
CD5014W.DEP 


If  'ADDRESS  clauses  for  subprograms  are  not  supported  ,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5w07B.DEP 


If  the  pragmas  SYSTEMNAME,  STORAGEUNIT,  and  MEMORYSIZE  must  come  at 
the  beginning  of  a  program  library,  then  the  following  files  are 
ommitted  from  the  associated  test: 

ED7004B0.TST  ED7004B2.TST 
ED7005C0.TST  ED7005C2.TST 
ED7005D0.TST  ED7005D2.TST 
ED7006C0.TST  ED7006C2.TST 
ED7006DO.TST  ED7006D2.TST 


If  any  limitations,  other  than  those  specified  in  the  RM,  are  imposed 
on  the  use  of  the  pragmas  SYSTEMNAME,  STORAGEUNIT,  and  MEMORYSIZE, 
then  the  following  test  may  be  inapplicable: 

CD7004C.TST  CD7005E.TST  CD7006E.TST 


Consider  the  following  declarations: 

TYPE  P  IS  DIGITS  SYSTEM . MAXDIGITS ; 

N  :  CONSTANT^  :-  2.0  *  F'MACHINERADIX  **  P'MACHINEEMAX; 

If  the  declaration  of  N  is  rejected  on  the  grounds  that  evaluation  of 
the  expression  will  raise  an  exception,  then  the  following  test  is 
inapplicable: 

C4A013B.ADA 
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Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**10  ..  2. 0**10  -  0.5 
DELTA  1.0  RANGE  -2. 0**11  ..  2. 0**11  -  1.0 
DELTA  2. 0**10  RANGE  -2. 0**21  ..  2. 0**21  -  2. 0**10 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531C.DEP  C45531D.DEP  C45532C.DEP 

C45532D.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**14  ..  2. 0**14  -  0.5 
DELTA  1.0  RANGE  -2. 0**15  ..  2. 0**15  -  1.0 
DELTA  2. 0**14  RANGE  -2. 0**29  ..  2. 0**29  -  2. 0**14 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531G.DEP  C45531H.DEP  C45532G.DBP 

C45532H.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**30  ..  2. 0**30  -  0.5 
DELTA  1.0  RANGE  -2. 0**31  ..  2. 0**31  -  1.0 
DELTA  2. 0**30  RANGE  -2. 0**61  ..  2. 0**61  -  2. 0**30 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531K.DEP  C45531L.DEP  C45532K.DEP 

C45532L.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**46  ..  2. 0**46  -  0.5 
DELTA  1.0  RANGE  -2. 0**47  ..  2. 0**47  -  1.0 
DELTA  2. 0**46  RANGE  -2. 0**93  ..  2. 0**93  -  2. 0**46 


are  not  supported,  then  the  following  tests  are  inapplicable: 

'  3/-  /  ’■ 

C455310.DEP  C45531P.DEP  C455320.DEP 

C45532P.DEP 


Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  2.0**-12  RANGE  -0.5  ..  0.5  -  2.0**-12 

DELTA  2.0**-ll  RANGE  -1.0  ..  1.0  -  2.0**-ll 

DELTA  2.0**-10  RANGE  -2.0  ..  2.0  -  2.0**-10 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531A.DEP  C45531B.DEP  C45532A.DEP 

C45532B.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-16  RANGE  -0.5  ..  0.5  -  2.0**-16 

DELTA  2.0**-15  RANGE  -1.0  ..  1.0  -  2.0**-15 

DELTA  2.0**-14  RANGE  -2.0  ..  2.0  -  2.0**-14 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531E.DEP  C45531P.DEP  C45532E.DEP 

C45532F.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-32  RANGE  -0.5  ..  0.5  -  2.0**-32 

DELTA  2.0**-31  RANGE  -1.0  ..  1.0  -  2.0**-31 

DELTA  2.0**-30  RANGE  -2.0  ..  2.0  -  2.0**-30 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531I.DEP  C45531J.DEP  C45532I.DEP 

C45532J.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-48  RANGE  -0.5  ..  0.5  -  2.0**-48 

DELTA  2.0**-47  RANGE  -1.0  ..  1.0  -  2.0**-47 

DELTA  2.0**-46  RANGE  -2.0  ..  2.0  -  2.0**-46 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531M.DEP^ '  C45531N.DEP  C45532M.DEP 

C45532N.DEP 
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Compile  Time  Inapplicability 


The  following  tests  depend  on  the  value  of  SYSTEM. MAX_OIGITS: 


C24113*.DEP  C35705*.DEP 
C35707*.DEP  C35708*.DEP 
C45241*.DEP  C45321*.DEP 
C45521*.DEP  C45524*.DEP 
C45641*.DEP  C46012*.DEP 


C35706*.DEP 

C35802*.DEP 

C45421*.DEP 

C45621*.DEP 


Use  the  table  below  to  determine  which  of  these  tests  are  applicable 
based  on  the  value  of  SYSTEM. MAX  DIGITS. 


Last  Letter  of 
Value  of  Test  Name  of 

MAX_DIGITS  Applicable  Tests 


5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 


A 

A,B 

A.  .C 

A.  .D 

A..E 

A..F 

A..G 

A..H 

A.. I 

A..J 

A.  .K 

A.  .L 

A.  .M 

A..N 

A..0 

A..P 

A.  .Q 

A.  .R 

A.  .S 

A..T 

A..U 

A..V 

A..W 

A..X 

A..Y 

A..Z 


If  the  value  of  SYSTEM. MAX_DIGITS  >  35,  then  the  following  test  is 
inapplicable:  , 

C4A011A.ADA 
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Compile  Time  Inapplicability 


If  a  generic  library-subprogram  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  test  is  inapplicable: 

CA1012A*.DEP 


If  a  generic  library- package  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  tests  are 
inapplicable: 

BC3204C*.DEP  BC3204D*.DBP 


If  a  generic,  non-library  package  body  cannot  be  compiled  as  a  subunit 
in  a  separate  file  than  its  specification,  then  the  following  test  is 
inapplicable: 

CA2009C*.DEP 


If  a  generic,  non-library  subprogram  body  cannot  be  compiled  as  a 
subunit  in  a  separate  file  than  its  specification,  then  the  following 
test  is  Inapplicable: 

CA2009F*.DEP 


If  a  generic  procedure  cannot  have  subunits  which  are  compiled  in 
separate  files  than  the  generic  unit,  then  the  following  test  is 
inapplicable: 

CA3011A*.DEP 


If  package  SYSTEM  is  used  by  package  TEXT_I0,  then  the  following  test 
is  inapplicable: 

C86001F.DEP 


If  SEQUEMTIAL_IO  cannot  be  instantiated  with  an  unconstrained  array 
type,  then  the  following  tests  are  inapplicable: 

AE2101C.DBP  EB22010.ADA 


If  SEQUENTIAL_IO  cannot  be  Instantiated  with  a  record  type  with 
discriminants  with  no  default  values,  then  the  following  tests  are 
inapplicable: 


AE2101C.DEP 


EE2201E.A0A 


Compile  Time  Inapplicability 


If  DIRECT  10  cannot  be  Instantiated  with  an  unconstrained  array  type, 
then  the  lolloving  tests  are  inapplicable: 

AE2101H.DEP  EE2401D.ADA 


If  DIRECT_I0  cannot  be  instantiated  with  a  record  type  with 
discriminants  with  no  default  values,  then  the  following  tests  are 
inapplicable: 

AE2101H.DEP  EE2401G.ADA 


If  there  are  no  strings  which  are  illegal  as  external  file  names,  then 
the  following  tests  are  inapplicable: 

CE2102C.TST  CE2102H.TST 


Tests  Which  Report  "NOT-APPLICABLE" 


This  section  is  concerned  with  tests  that  can  detect,  at  runtime, 
certain  implementation  characteristics  that  make  the  tests  inapplicable. 
The  result  reported  for  these  tests  is  'NOT_APPLICABLE' .  These  tests  must 
compile  and  execute. 


If  USE_ERROR  or  NAME  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  with  mode  IN_FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  input  and  output;  See  AI-00332),  then  the  following  test 
should  report  NOT_APPLICABLE: 

CE3109A.ADA 


If  CREATE  with  mode  IN_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE: 

CE3102E.ADA 


If  OPEN  with  mode  IN  FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE; 

CE3102J.ADA 


If  USE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  wilh  mode  0UT_FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  input  and  output;  see  AI-00332),  then  the  following  tests 
should  report  NOT_APPLICABLE: 


CE2109C.ADA 

CE3107B.ADA 

CE3403A.ADA 

CE3408B.ADA 

CE3605A.ADA 

CE3905B.ADA 

EE3410P.ADA 


CE3102A.ADA 

CE3112C.ADA 

CE3406B.ADA 

CE3409A.ADA 

CE3605E.ADA 

EE3405B.ADA 


CE3102B.TST 

CE3402D.ADA 

CE3407B.ADA 

CE3410A.ADA 

CE3706F.ADA 

EE3409F.ADA 


If  CREATE  with  mode  0UT_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE: 

CE3 1021. ADA 
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Tests  Which  Report  "NOT-APPLICABLE" 


If  OPEN  with  mode  0UT_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE! 

CE3102K.ADA 


If  RESET  is  supported  for  text  files,  then  the  following  test  should 
report  NOT_APPLI CABLE: 

CE3102F.ADA 


If  DELETE  for  text  files  is  supported,  then  the  following  test  should 
report  NOT_APPLICABLE : 

CE3102G.ADA 


If  USE_ERROR  or  NAME  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  text  files  other  than  standard 
input  and  output;  see  AI -00332),  then  the  following  tests  should 
report  NOT  APPLICABLE: 


CE2108A.ADA 

CE2108D.ADA 

CE3104A.ADA 

CE3108B.ADA 

CE3112B.ADA 

CE3203A.ADA 

CE3301B.ADA 

CE3305A.ADA 

CE3402C.ADA 

CE3403E.ADA 

CE3404B.AOA 

CE3405A.ADA 

CE3405D.ADA 

CE3406D.ADA 

CE3408A.ADA 

CE3409D.ADA 

CE3410C.ADA 

CE3410F.ADA 

CE3411C.ADA 

CE3413C.ADA, 

CE3602C.ADA 

CE3604A.ADA 

CE3605C.ADA 

CE3606B.ADA 

CE3704D.ADA 

CE3704M.ADA 

CE3706D.ADA 

CE3804B.ADA 


CE2108B.ADA 

CE3102H.ADA 

CE3104B.ADA 

CE3110A.ADA 

CE3112D.ADA 

CE3208A.ADA 

CE3301C.ADA 

CE3402A.ADA 

CE3403B.ADA 

CE3403F.ADA 

CE3404C.ADA 

CE3405B.ADA 

CE3406A.ADA 

CE3407A.ADA 

CE3408C.ADA 

CE3409E.ADA 

CE3410D.AOA 

CE3411A.AOA 

CE3412A.ADA 

CE3602A.ADA 

CE3602D.ADA 

CE3604B.ADA 

CE3605D.ADA 

CE3704A.ADA 

CE3704E.ADA 

CE3704N.ADA 

CE3706G.ADA 

CE3804C.ADA 


CE2108C.ADA 

CE3103A.ADA 

CE3108A.ADA 

CE3112A.ADA 

CE3114A.ADA 

CE3301A.ADA 

CE3302A.ADA 

CE3402B.ADA 

CE3403C.ADA 

CE3404A.ADA 

CE3404D.ADA 

CE3405C.ADA 

CE3406C.ADA 

CE3407C.ADA 

CE3409C.ADA 

CE3409F.ADA 

CE3410E.ADA 

CE3411B.ADA 

CE3413A.ADA 

CE3602B.ADA 

CE3603A.ADA 

CE3605B.ADA 

CE3606A.ADA 

CE3704B.ADA 

CE3704F.ADA 

CE37040.ADA 

CE3804A.ADA 

CE3804D.ADA 
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Tests  Which  Report  "NOT-APPLICABLE” 


CE3804E.ADA 

CE3804H.ADA 

CE3804K.AOA 

CE3804N.ADA 

CE3805A.ADA 

CE3806B.AOA 

CE3806G.AOA 

CE3905C.ADA 

CE3906B.ADA 

CE3906P.ADA 

EE3412C.AOA 


CE3804P.ADA 

CE3804I.ADA 

CE3804L.A0A 

CE38040.ADA 

CE3805B.A0A 

CE3806D.ADA 

CE3806H.AOA 

CE3905L.ADA 

CE3906C.ADA 

EE3203A.AOA 


CE3804G.ADA 

CE3804J.AOA 

CB3804M.ADA 

CE3804P.AOA 

CE3806A.ADA 

CE3806E.ADA 

CE390SA.AOA 

CE3906A.AOA 

CB3906E.AOA 

EE3402B.AOA 


If  RESET  is  not  supported  for  text  files,  then  the  following  tests 
should  report  NOT_APPLICABLE: 

CE3104C.ADA  CE3115A.ADA 


If  DELETE  for  text  files  is  not  supported,  then  the  following  tests 
should  report  NOT_APPLICABLE: 

CE3110A.ADA  CE3114A.ADA 


If  association  of  multiple  internal  text  files  to  a  single  external 
file  is  not  supported,  then  the  following  tests  should  report 
NOT_APPLICABLE: 

CE2110B.ADA  CE3111A.ADA  CE3111B.ADA 
CE3111C.ADA  CE3111D.ADA  CE3111E.ADA 
CE3114B.ADA  CE3115A.ADA 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  with  mode  IN  FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  3oes  not  support  sequential 
files;  see  AI-00332)'  then  the  following  test  should  report 
NOT_APPLI CABLE: 

CE2105A.A0A 


If  CREATE  and  OPEN  with  mode  IN_FILE  are  supported  for  sequential 
files,  then  the  following  tests  should  report  NOT_APFLICABLE: 

CE2102D.ADA  CE2102N.AOA 
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If  RESET  to  mode  IN_FILE  is  supported  for  sequential  files  ,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CE21020.ADA  CE2111F.ADA  CE2111I.ADA 
CE2204C.A0A 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  with  mode  OUT  FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  dioes  not  support  sequential 
files;  see  AI-00332),  then  the  following  tests  should  report 
NOT_APPLI CABLE! 

CE2102A.ADA  CE2102C.TST  CE2102X.ADA 
CE2106A.ADA  CE2108E.ADA  CE2109A.ADA 
CE2110A.ADA 


If  CREATE  and  OPEN  with  mode  OUT_FILE  are  supported,  then  the 
following  tests  should  report  NOT_APPLI CABLE: 

CE2102E.ADA  CE2102P.ADA 


If  RESET  to  mode  OUT  FILE  is  supported  for  sequential  files,  then  the 
following  test  should  report  NOT__APPLICABLE: 

CE2102Q.ADA 


If  RESET  to  mode  0UT_FILE  is  not  supported  for  sequential  files,  then 
the  following  tests  should  report  NOT_APPLI CABLE: 

CE2111C.ADA  CE2111D.ADA  CE2111F.ADA 
CE2111I.ADA 


If  DELETE  for  sequential  files  is  not  supported,  then  the  following 
tests  should  report  NOT_APPLI CABLE: 

CE2106A.A0A  CE2110A.AOA 


If  association  of  multiple  internal  sequential  files  to  a  single 
external  file  is^nbt  supported,  then  the  following  tests  should  report 
NOTAPPLI CABLE ! 

CE2107A.ADA  CE2107B.ADA  CE2107C.ADA 
CE2107D.ADA  CE2111D.ADA 
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If  IISE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  sequential  files;  see  AI-00332), 
then  the  following  tests  should  report  NOT_APPLI CABLE : 


CE2103C.ADA 

CE2104B.ADA 

CE2108F.ADA 

CE2201A.ADA 

CE2201F.AOA 

CE2201I.ADA 

CE2201L.ADA 

CE2204A.ADA 

CE2204D.ADA 

CE2210A.AOA 


CE2102G.ADA 

CE2108A.ADA 

CE2111A.ADA 

CE2201B.ADA 

CE2201G.ADA 

CE2201J.ADA 

CE2201M.ADA 

CE2204B.ADA 

CE2205A.A0A 


CE2104A.ADA 

CE2108B.ADA 

CE2115B.ADA 

CB2201C.ADA 

CE2201H.ADA 

CE2201K.AOA 

CE2201N.ADA 

CE2204C.ADA 

CE2208B.ADA 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt 
open  a  direct  access  file  with  mode  IN  FILE  (this  is 
behavior  for  an  implementation  which  does  not  support 
files;  see  AI-00332),  then  the  following  tests 
NOT_APPLI CABLE: 

CE2105B.ADA  CE2401E.ADA  CE2401F.ADA 
CE2401H.ADA  CE2401I.ADA  CB2401J.ADA 
CE2405B.AOA  CE2407A.ADA 


If  CREATE  with  mode  IN_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  NOT_APPLI CABLE: 

CE2102I.ADA 


If  OPEN  with  mode  IN  PILE  is  supported  for  direct  access  files,  then 
the  following  test  sHould  report  NOT_APPLICABLE; 

CE2102T.ADA 


If  RESET  with  mode  IN  FILE  is  supported  for  direct  access  files,  then 
the  following  tests  sRould  report  NOT_APPLICABLE: 

CE2102U.ADA  ^  -  '  CE2407B.ADA 


to  create  or 
the  appropriate 
direct  access 
should  report 


If  RESET  with  mode  IN_FILE  is  not  supported  for  direct  access  files, 
then  the  following  tests  should  report  NOT_APPLICABLE; 

CE2111B.ADA  CE2111G.ADA  CE2111H.ADA 
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If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  OUT_FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  direct  access 
files;  see  A1 -00332),  then  the  following  tests  should  report 
N0T_APPLI CABLE: 

CE2102B.ADA  CE2102Y.ADA  CE2106B.ADA 
CE2110C.ADA  CE2401K.ADA  CE2404A.ADA 
CE2404B.ADA  CE2407A.ADA  CE2407B.ADA 
CE2408A.AOA  CE2409B.ADA  CE2410A.ADA 
CE2410B.ADA 


If  CREATE  and  OPEN  with  mode  0UT_FILE  is  supported  for  direct  access 
files,  then  the  following  tests  should  report  NOT_APPLICABLE: 

CE2102J.ADA  CE2102V.ADA 


If  RESET  with  mode  0UT_FILB  is  supported  for  direct  access  files,  then 
the  following  test  should  report  N0T_APPLI CABLE : 

CE2102W.ADA 


If  USE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  INOUT  FILE  (this  is  the 
appropriate  behavior  for  an  implementation  whicH  does  not  support 
direct  access  files;  see  AI-00332),  then  the  following  tests  should 
report  NOT_APPLICABLE: 

CE2102H.TST  CE2109B.ADA  CE2401E.ADA 
CE2401F.ADA  CE2401H.ADA  CE2401I.ADA 
CE2401J.ADA  CE2401K.ADA  CE2401L.ADA 
CE240SB.AOA  CE2408B.AOA  CE2409A.ADA 


If  CREATE  and  OPEN  with  mode  INOUT_FILE  are  supported  for  direct 
access  files,  then  the  following  tesTs  should  report  NOT_APPLICABLE: 

CE2102P.ADA  CE2102R.ADA 


If  RESET  to  mode  INOUT_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  NOT_APPLICABLE: 


CE2102S.ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


If  DELETE  for  direct  access  files  is  not  supported,  then  the  following 
tests  should  report  NOT_APPLI CABLE: 

CE2106B.ADA  CE2110C.ADA 


If  association  of  multiple  Internal  direct  access  files  to  a  single 
external  file  is  not  supported,  then  the  following  tests  should  report 
NOTAPPLI CABLE: 

CE2107F.ADA  CE2107G.ADA  CE2107H.ADA 
CE2107I.ADA  CE2110D.ADA  CE2111H.ADA 


If  USB_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  direct  access  files;  see 
AI-00332),  then  the  following  tests  should  report  NOT_APPLICABLE: 

CE2102K.ADA  CE2103D.ADA  CE2104C.ADA 
CE2 1040. ADA  CE2108C.ADA  CE2108D.AOA 
CE2108G.ADA  CE2108H.ADA  CE2111E.ADA 
CB211SA.A0A  CE2401A.AOA  CE2401B.ADA 
CE2401C.ADA  CE2406A.ADA  CE2411A.ADA 


If  association  of  an  internal  sequential  file  and  an  internal  direct 
access  file  to  a  single  external  file  is  not  supported,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CE2107E.ADA  CE2107L.ADA 


If  the  INLINE  pragma  is  not  supported  for  PROCEDURES,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CA3004E*.ADA  EA3004C*.ADA  LA3004A*.ADA 


If  the  INLINE  pragma  is  not  supported  for  FUNCTIONS,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CA3004F*.ADA  EA3004D*.ADA  LA3004B*.ADA 


If  excessive  recursion  causes  STORAGE  ERROR  to  be  raised,  then  the 
following  test  should  report  N0T_APP LI CABLE: 


D64005F*.ADA 


Tests  Which  Report  "NOT-APPLICABLE' 


If  DURATION' FIRST  -  DURATION' BASE' FIRST  or  DURATION' LAST 
DURATION' BASE' LAST,  then  the  following  test  should  report 
NOT_APPLI CABLE,  if  it  otherwise  executes  properly: 

C96005B.TST 


Consider  the  declaration 

TYPE  F  IS  DIGITS  SYSTEM. MAX_DIGITS; 

If  F'MACHINE_OVERFLOUS  is  false  and  2.0  *  F'MACHINE_RADIX  ** 

F'MACHINE_EMAX  <=  F ' BASE ' LARGE ,  then  the  following  test  should  report 
NOT_APPLICABLE  if  it  compiles  without  error: 

C4A013B.ADA 


-w 


APPENDIX  C 

Package  REPORT  Specification  and  Body 


—  REPSPEC.ADA 

—  PURPOSE*. 

THIS  REPORT  PACKAGE  PROVIDES  THE  MECHANISM  FOR  REPORTING  THE 
PASS/PAIL/NOT-APPLICABLE  RESULTS  OP  EXECUTABLE  (CLASSES  A,  C, 

D,  E,  AND  L)  TESTS. 

IT  ALSO  PROVIDES  THE  MECHANISM  FOR  GUARANTEEING  THAT  CERTAIN 
VALUES  BECOME  DYNAMIC  (NOT  KNOWN  AT  COMPILE-TIME). 

—  HISTORY: 

JRK  12/13/79 
JRK  06/10/80 
JRK  08/06/81 
JRK  10/27/82 
JRK  06/01/8A 

PWB  07/30/87  ADDED  PROCEDURE  SPECIAL  ACTION. 

TBN  08/20/87  ADDED  FUNCTION  LEGAL_FILE_NAMB. 

PACKAGE  REPORT  IS 

SUBTYPE  PILE_NUM  IS  INTEGER  RANGE  1..3; 

—  THE  REPORT  ROUTINES. 

PROCEDURE  TEST  "  —  THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 

—  START  OP  A  TEST,  BEFORE  ANY  OP  THE 
—  OTHER  REPORT  ROUTINES  ARB  INVOKED. 

—  IT  SAVES  THE  TEST  NAME  AND  OUTPUTS  THE 
—  NAME  AND  DESCRIPTION. 

(  NAME  :  STRING;  —  TEST  NAME,  E.G.,  "C23001A-AB" . 

DESCR  :  STRING  —  BRIEF  DESCRIPTION  OF  TEST,  E.G., 

—  "UPPER/LOVER  CASE  EQUIVALENCE  IN  "  & 


...  4-.  H.  ...  .  .  t<.  IVI'- 
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"IDENTIFIERS". 


PROCEDURE  FAILED 


(  DESCR  :  STRING 


OUTPUT  A  FAILURE  MESSAGE.  SHOULD  BE 
INVOKED  SEPARATELY  TO  REPORT  THE 
FAILURE  OF  EACH  SUBTEST  WITHIN  A  TEST. 
BRIEF  DESCRIPTION  OF  WHAT  FAILED. 
SHOULD  BE  PHRASED  AS: 

"(FAILED  BECAUSE)  ...REASON...". 


PROCEDURE  NOT  APPLICABLE  — 


(  DESCR  :  STRING 


OUTPUT  A  NOT-APPLI CABLE  MESSAGE. 

SHOULD  BE  INVOKED  SEPARATELY  TO  REPORT 
THE  NON-APPLICABILITY  OP  EACH  SUBTEST 
WITHIN  A  TEST. 

BRIEF  DESCRIPTION  OP  WHAT  IS 

NOT- APPLICABLE.  SHOULD  BE  PHRASED  AS: 

"(NOT-APPLICABLB  BECAUSE) . . .REASON. . . ". 


PROCEDURE  SPECIAL  ACTION  — 


(  DESCR  :  STRING 


OUTPUT  A  MESSAGE  DESCRIBING  SPECIAL 
ACTIONS  TO  BE  TAKEN. 

SHOULD  BE  INVOKED  SEPARATELY  TO  GIVE 
EACH  SPECIAL  ACTION. 

BRIEF  DESCRIPTION  OP  ACTION  TO  BE 
TAKEN. 


PROCEDURE  COMMENT 
(  DESCR  :  STRING 
); 


OUTPUT  A  COMMENT  MESSAGE. 
THE  MESSAGE. 


PROCEDURE  RESULT; 


THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 
END  OP  A  TEST.  IT  OUTPUTS  A  MESSAGE 
INDICATING  WHETHER  THE  TEST  AS  A 
WHOLE  HAS  PASSED,  FAILED,  IS 
NOT-APPLICABLE,  OR  HAS  TENTATIVELY 
PASSED  PENDING  SPECIAL  ACTIONS. 


--  THE  DYNAMIC  VALUE  ROUTINES. 


—  EVEN  WITH  STATIC  ARGUMENTS,  THESE  FUNCTIONS  WILL  HAVE  DYNAMIC 

—  RESULTS. 


FUNCTION  IDENT  INT 
(  X  :  INTEGIR 
)  RETURN  INTEGER; 


—  AN  IDENTITY  FUNCTION  FOR  TYPE  INTEGER. 

—  THE  ARGUMENT. 

—  X. 


FUNCTION  IDENT  CHAR 


(  X  :  CHARACTER 
)  RETURN  CHARACTER; 


—  AN  IDENTITY  FUNCTION  FOR  TYPE 

—  CHARACTER. 

—  THE  ARGUMENT. 

—  X. 


.  "w  *v  ^  .  V 
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FUNCTION  IDENT  BOOL  —  AN  IDENTITY  FUNCTION  FOR  TYPE  BOOLEAN. 

(  X  :  BOOLEAN  —  THE  ARGUMENT. 

)  RETURN  BOOLEAN;  —  X. 

FUNCTION  IDENT_STR  —  AN  IDENTITY  FUNCTION  FOR  TYPE  STRING. 

(  X  :  STRING  —  THE  ARGUMENT. 

)  RETURN  STRING;  —  X. 

FUNCTION  EQUAL  —  A  RECURSIVE  EQUALITY  FUNCTION  FOR  TYPE 

—  INTEGER. 

(  X,  Y  ;  INTEGER  —  THE  ARGUMENTS. 

)  RETURN  BOOLEAN;  —  X  -  Y. 

—  OTHER  UTILITY  ROUTINES. 

FUNCTION  LEGAL_FILE_NAME  —  A  FUNCTION  TO  GENERATE  LEGAL  EXTERNAL 

—  FILE  NAMES. 

(  X  :  FILENUM  1;  —  DETERMINES  FIRST  CHARACTER  OF  NAME. 

NAM  :  STRING  —  DETERMINES  REST  OF  NAME. 

)  RETURN  STRING;  —  THE  GENERATED  NAME. 


END  REPORT; 


REPORT  Package  Body 


—  REPBODY.ADA 

—  HISTORY: 

DCB  04/27/80 
JRK  6/10/80 
JRK  11/12/80 
JRK  8/6/81 
JRK  10/27/82 
JRK  6/1/84 

JRK  11/18/85  ADDED  PRAGMA  ELABORATE. 

PWB  07/29/87  ADDED  STATUS  ACTIONREQUIRED  AND 
PROCEDURE  SPECIAL_ACTION. 

TBN  08/20/87  ADDED  FUNCTION  LBGAL_PILE_NAME. 

VITH  TEXT_IO; 

USE  TEXT_IO; 

PRAGMA  ELABORATE  (TEXTIO); 

PACKAGE  BODY  REPORT  IS 

TYPE  STATUS  IS  (PASS,  FAIL,  DOES_NOT_APPLY,  ACTION_REQUIRED) ; 
TEST_STATUS  :  STATUS  FAIL; 

MAX_NAME  LEN  :  CONSTANT  15;  —  MAXIMUM  TEST  NAME  LENGTH. 

TEST_NAMS  :  STRING  (1. .MAX_NAME_LEN); 

NO  NAME  :  CONSTANT  STRING  (1..7)  "NO_NAME"; 

TEST_NAME_LEN  :  INTEGER  RANGE  0 . . MAX_NAME_LEN  0; 

PROCEDURE  PUTMSG  (MSG  :  STRING)  IS 

—  WRITE  MESSAGE.  LONG  MESSAGES  ARE  FOLDED  (AND  INDENTED). 
MAX_LEN  :  CONSTANT  INTEGER  RANGE  50.. 150  72;  —  MAXIMUM 

—  OUTPUT  LINE  LENGTH. 

INDENT  :  CONSTANT  INTEGER  TEST  NAME  LEN  +  9;  —  AMOUNT  TO 

—  Indent  continuation  lines. 

I  :  INTEGER  0;  —  CURRENT  INDENTATION, 

M  !  INTEGER  MSG' FIRST;  —  START  OF  MESSAGE  SLICE. 

N  :  INTEGER;  —  END  OP  MESSAGE  SLICE. 

BEGIN 

LOOP 

IP  I  +  (MSG'LAST-M+1)  >  MAX_LEN  THEN 
N  M  +  (MAX_LEN-I)  -  1; 

IF  MSG  (N)  /-  '  '  THEN 

,  WHILE  N  >-  M  AND  THEN  MSG  (N+1)  /-  '  '  LOOP 
N  :«  N  -  1; 

END  LOOP; 

IF  N  <  M  THEN 

N  M  +  (MAX_LEN-I)  -  1; 

END  IP; 

END  IP; 

ELSE  N  MSG 'LAST; 

END  IF; 
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SET_COL  (STANDARD  OUTPUT,  COUNT  (I+l)); 

PUT_LINE  (STANDARD_OUTPUT,  MSG  (M..N)); 

I  INDENT; 

M  :>  N  -t-  1; 

WHILE  M  <-  MSG' LAST  AND  THEN  MSG  (M)  -  '  '  LOOP 
M  M  +  1; 

END  LOOP; 

EXIT  WHEN  M  >  MSG 'LAST; 

END  LOOP; 

END  PUT_HSG; 

PROCEDURE  TEST  (NAME  :  STRING;  DESCR  :  STRING)  IS 
BEGIN 

TESTSTATUS  PASS; 

IF  NAME 'LENGTH  <-  MAX_NAME_LEN  THEN 
TEST_NAME_LEN  NAME 'LENGTH; 

ELSE  TEST_NAME_LEN  MAX_NAME_LEN; 

END  IP; 

TEST_NAME  (1..TEST  NAME_LEN) 

NAME  (NAME' FIRST  ..  NAME ' PIRST+TEST  NAME  LEN-1); 
PUTMSG  (""); 

PUT  MSG  (" - "  &  TEST_NAMB  (1.  .TEST_NAMB_LEN)  &  "  "  J. 

DESCR  & 

END  TEST; 

PROCEDURE  COMMENT  (DESCR  :  STRING)  IS 
BEGIN 

PUT_MSG  ("  -  "  &  TEST_NAME  (1. .TEST_NAME_LEN)  &  "  "  & 

DESCR  &  "."); 

END  COMMENT; 

PROCEDURE  FAILED  (DESCR  :  STRING)  IS 
BEGIN 

TEST_STATUS  FAIL; 

PUT_MSG  ("  *  "  &  TEST_NAME  (1.  .TEST_NAME_LEN) 

DESCR  &  "."); 

END  FAILED; 

PROCEDURE  NOTAPPLICABLE  (DESCR  :  STRING)  IS 
BEGIN 

IF  TEST  STATUS  -  PASS  OR  TEST_STATUS  -  ACTIONREQUIRED  THEN 
TEST_STATUS  DOES_NOT_APPLy; 

END  IF; 

PUT_HSG  ("  .  &  TEST  NAME  (1.  .TEST_NAME_LEN)  &  "  "  & 

DESCR' «t  "."); 

END  NOT_APPLICABLE; 

PROCEDURE  SPECIALACTION  (DESCR  :  STRING)  IS 
BEGIN 

IP  TEST  STATUS  =  PASS  THEN 

TESTSTATUS  ACTIONREQUIRED; 

END  IF; 
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PUTMSG  ("  !  "  fit  TEST_NAME  (1. .TEST_NAME_LEN)  S  "  "  & 

DESCR  & 

END  SPECIAL_ACTION; 

PROCEDURE  RESULT  IS 
BEGIN 

CASE  TEST_STATUS  IS 
WHEN  PASS  -> 

PUT_MSG  -  "  &  TEST  NAME  (1.  .TEST_NAME_LEN)  & 

"  PASSED 
WHEN  DOES  NOT  APPLY  -> 

PUT_MSG  T"++++  "  &  TESTNAME  ( 1 . . TEST_NAME  LEN)  & 

"  NOT-APPLICABLE  ++++++++++++++++++++.")• 

WHEN  ACTION_REQUIRED  -> 

PUT_MSG  ("1!!!  "  &  TEST_NAME  (1..TEST  NAME  LEN)  & 

"  TENTATIVELY  PASSED  ! ! ! !  ml!  1 !  iTl  I ! . ; 
PUTMSG  ("!!!!  "  &  (1 . .TEST_NAME_LEN  .>  '  ')  & 

"  SEE  M'  COMMENTS  FOR  SPECIAL  NOTES!!"); 

WHEN  OTHERS  -> 

PUT_MSG  ("****  "  &  TEST_NAMB  (1. .TEST_NAME_LEN)  & 

"  FAILED  ****************************,")• 

END  CASE; 

TEST_STATUS  :.  FAIL; 

TEST  NAMELEN  ;.  NO_NAME ' LENGTH ; 

TEST^NAME  ( 1 . . TEST_NAME  LEN)  NO_NAME; 

END  RESULT; 

FUNCTION  IDENT_INT  (X  :  INTEGER) 

BEGIN 

IF  EQUAL  (X,  X)  THEN 
RETURN  X; 

END  IF; 

RETURN  0; 

END  IDENT_INT; 

FUNCTION  IDENTCHAR  (X  :  CHARACTER)  RETURN  CHARACTER  IS 
BEGIN 

IF  EQUAL  (CHARACTER' POS(X),  CHARACTER' POS(X) )  THEN  —  ALWAYS 

—  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  'O';  —  NEVER  EXECUTED. 

END  IDENT_CHAR; 

FUNCTION  IDENT_B06l  (X  ;  BOOLEAN)  RETURN  BOOLEAN  IS 
BEGIN 

IF  EQUAL  (BOOLEAN' POS(X),  BOOLEAN' POS(X) )  THEN  —  ALWAYS 

—  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  FALSE;  —  NEVER  EXECUTED. 

END  IDENT  BOOL; 


RETURN  INTEGER  IS 

—  ALWAYS  EQUAL. 

—  ALWAYS  EXECUTED. 

—  NEVER  EXECUTED. 


REPORT  Package  Body 


FUNCTION  IDENT_STR  (X  ;  STRING)  RETURN  STRING  IS 
BEGIN 

IF  EQUAL  (X' LENGTH,  X' LENGTH)  THEN  —  ALWAYS  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  —  NEVER  EXECUTED. 

END  IDENT_STR; 

FUNCTION  EQUAL  (X,  Y  :  INTEGER)  RETURN  BOOLEAN  IS 

REC_LIMIT  :  CONSTANT  INTEGER  RANGE  1..100  3;  —  RECURSION 

—  LIMIT. 

Z  ;  BOOLEAN;  —  RESULT. 

BEGIN 

IF  X  <  0  THEN 

IF  Y  <  0  THEN 

Z  EQUAL  (-X,  -Y) ; 

ELSE  Z  :*  FALSE; 

END  IF; 

ELSIF  X  >  REC_LIMIT  THEN 

Z  :=  EQUAL  (REC_LIHIT,  Y-X+REC_LIMIT) ; 

ELSIF  X  >  0  THEN 

Z  EQUAL  (X-1,  Y-1); 

ELSE  Z  :=  Y  =  0; 

END  IF; 

RETURN  Z; 

EXCEPTION 

WHEN  OTHERS  => 

RETURN  X  =  Y; 

END  EQUAL; 

FUNCTION  LEGAL_FILE_NAME  (X  :  FILE  NUM  :  1; 

NAM  J  STRING  "") 

RETURN  STRING  IS 
SUFFIX  :  STRING  (2.. 6); 

BEGIN 

IF  NAM  -  ""  THEN 

SUFFIX  TEST_NAME(3. .7); 

ELSE 

SUFFIX  NAM(3..7); 

END  IF; 

CASE  X  IS 

WHEN  1  ->  RETURN  ('X'  &  SUFFIX); 

WHEN  2  ->  RETURN  ('Y'  &  SUFFIX); 

WHEN  3  RETURN  ('Z'  &  SUFFIX); 

END  CASE; 

END  LEGAL_FILE_NAME; 

BEGIN 

TEST_NAME_LEN  N0_NAME ' LENGTH ; 

TEST_NAME  (1..TEST  NAME_LEN)  NO  NAME; 
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Procedure  CHBCKPILE  Body 


—  CHECKFILE.ADA 

—  THIS  IS  A  PROCEDURE  USED  BY  MANY  OP  THE  CHAPTER  14  TESTS  TO  CHECK  THE 

—  CONTENTS  OP  A  TEXT  FILE. 

—  THIS  PROCEDURE  ASSUMES  THE  FILE  PARAMETER  PASSED  TO  IT  IS  AN  OPEN 

—  TEXT  FILE. 

—  THE  STRING  PARAMETER  CONTAINS  THE  CHARACTERS  THAT  ARE  SUPPOSED  TO  BE 

—  IN  THE  TEXT  FILE.  A  CHARACTER  IS  USED  IN  THE  STRING  TO  DENOTE 

—  THE  END  OP  A  LINE.  A  CHARACTER  IS  USED  TO  DENOTE  THE  END  OF  A 

—  PAGE.  A  'X'  CHARACTER  IS  USED  TO  DENOTE  THE  END  OP  THE  TEXT  FILE. 

—  THESE  SYMBOLS  SHOULD  NOT  BE  USED  AS  TEXT  OUTPUT. 

—  SPS  11/30/82 

—  JBG  2/3/83 

WITH  REPORT;  USE  REPORT; 

WITH  TEXTIO;  USE  TEXT_IO; 

PROCEDURE  CHECK_FILE  (FILE:  IN  OUT  FILE_TYPE;  CONTENTS  :  STRING)  IS 
X  :  CHARACTER; 

COLCOUNT  :  POSITIVE  COUNT  1; 

LINECOUNT  :  POSIIIViCOUNT  1; 

PAGECOUNT  :  POSITIVE  COUNT  1; 

TRAILING_BLANKS_MSG  WRITTEN  :  BOOLEAN  FALSE; 

STOPPROCESSING  :  EXCEPTION; 

PROCEDURE  CHECKENDOPLINE  (EXPECTEND  OP  PAGE  :  BOOLEAN)  IS 
BEGIN 

—  SKIP  OVER  ANY  TRAILING  BLANKS.  AN  IMPLEMENTATION  CAN  LEGALLY 


A 


Procedure  CHECKFILE  Body 


—  APPEND  BLANKS  TO  THE  END  OF  ANY  LINE. 

VHILE  NOT  END  OF_LINE  (FILE)  LOOP 
GET  (FILE,  X); 

IF  X  /-  '  '  THEN 

FAILED  ("FROM  CHECK_FILE:  END  OP  LINE  EXPECTED  -  " 
X  &  "  ENCOUNTERED"); 

RAISE  STOPPROCESSING; 

ELSE 

IF  NOT  TRAILING_BLANKS_MSG  WRITTEN  THEN 
COMMENT  ("FROM  CHECKFILE;  "  & 

"THIS  IMPLEMENTATION  PADS  "  & 

"LINES  WITH  BLANKS"); 
TRAILING_BLANKS_MSG  WRITTEN  TRUE; 

END  IF; 

END  IP; 

END  LOOP; 

IP  LINECOUNT  /=  LINE  (FILE)  THEN 
FAILED  ("FROM  CHECK_FILE:  "  & 

"LINE  COUNT  INCORRECT  -  EXPECTED  "  & 
POSITIVE_COUNT'IMAGE(LINE  COUNT)  & 

"  GOT  FROM  PILE  "  & 

POSITIVE_COUNT' IMAGE(LINE(PILE) ) ) ; 

END  IF; 

—  NOTE;  DO  NOT  SKIP  LINE  WHEN  AT  END  OF  PAGE  BECAUSE  SKIP  LINE  WILL 

ALSO  SKIP  THE  PAGE  TERMINATOR.  SEE  RM  14.3.5  PARAGRAPH  1. 

IP  NOT  EXPECT  END  OP  PAGE  THEN 
IP  END  OF  PAGE  TFILE)  THEN 

FAILED  ("FROM  CHECK_FILE;  PREMATURE  END  OF  PAGE"); 
RAISE  STOPPROCESSING; 

ELSE 

SKIPLINE  (FILE); 

LINE_COUNT  ;=  LINE_COUNT  +  1; 

END  IF; 

END  IF; 

COL_COUNT  1; 

END  CHECK_END_OF_LINE; 

PROCEDURE  CHECK_END_OP_PAGE  IS 
BEGIN 

IF  NOT  END  OP  PAGE  (FILE)  THEN 

PAILE&.(’^FROM  CHECK  FILE;  "  & 

"END  OF  PAGE  NOT  WHERE  EXPECTED"); 

RAISE  STOPPROCESSING; 

ELSE 

IP  PAGE  COUNT  /-  PAGE  (FILE)  THEN 
FAILED  ("FROM  CHECKFILE;  "  & 

"PAGE  COUNT  INCORRECT  -  EXPECTED  "  & 
POSITIVECOUNT' IMAGE  (PAGE_COUNT)  & 
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Procedure  CHECKFILE  Body 


"  GOT  FROM  FILE  "  & 

POSITIVE_COUNT' IMAGE  (PAGE(FILE) ) ) ; 

END  IP; 

SKIP_PAGE  (FILE); 

PAGECOUNT  PAGE_COUNT  +  1; 

LINE_COUNT  1; 

END  IP; 

END  CHECK_END  OP_PAGE; 


BEGIN 


RESET  (FILE,  IN_FILE); 

SET  LINE_LENGTH  ( STANDARDOUTPUT ,  0); 

SET~PAGE_LENGTH  (STANDARD_OUTPUT,  0); 

FOR  I  IN  1  ..  CONTENTS 'LENGTH  LOOP 

BEGIN 

CASE  CONTENTS  (I)  IS 
WHEN  -> 

CHECK_END_OF  LINE  (CONTENTS  (I  +  1)  - 

WHEN 

CHECK_END  OPPAGE; 

WHEN  'X'  =.> 

IP  NOT  END  OP  FILE  (FILE)  THEN 

FAILEB  (’^FROM  CHECK_PILE:  "  & 

"END  OF  PILE  NOT  WHERE  EXPECTED"); 
RAISE  STOP  PROCESSING; 

END  IF; 

WHEN  OTHERS  -> 

IP  COL  COUNT  /-  COL(PILE)  THEN 

FAILED  ("PROM  CHECK  FILE:  "  & 

"COL  COUNT  INCORRECT  -  "  & 
"EXPECTED  "  &  POSITIVE  COUNT' 

IMAGE  (COL  COUNT)  &  "  GOT  FROM  "  (, 
"FILE  "  &"POSITIVE  COUNT 'IMAGE 
(COL(FILE))); 

END  IF; 

GET  (PILE,  X); 

COL  COUNT  COLCOUNT  +  1; 

IF  E  /-  CONTENTS  (I)  THEN 

FAILED("PROM  CHECK  FILE:  "  & 

"PILE  DOES  NOT  CONTAIN  CORRECT  "  & 

'  "OUTPUT  -  EXPECTED  "  &  CONTENTS(I) 

&  "  -  GOT  "  i  X); 

RAISE  STOPPROCESSING; 

END  IP; 

END  CASE; 

EXCEPTION 

WHEN  STOP  PROCESSING  -> 

COMMENT  ("FROM  CHECK  PILE;  "  & 


D-3 


Procedure  CHECKFILE  Body 


"LAST  CHARACTER  IN  FOLLOWING  STRING  "  & 
"REVEALED  ERROR:  "  &  CONTENTS  (1  ..  I)); 

EXIT; 

END; 

END  LOOP; 

EXCEPTION 

WHEN  STATUSERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"STATUS  ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  MODE_ERROR  -> 

FAILED  ("FROM  CHECKFILE:  "  & 

"MODE_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  NAMEERROR  => 

FAILED  ("FROM  CHECKFILE:  "  & 

"NAME_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  USEERROR  => 

FAILED  ("FROM  CHECK_FILE:  "  & 

"USEERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DEVICE_ERROR  -> 

FAILED  ("FROM  CHECKFILE:  "  & 

"DEVICE_BRROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  END_ERROR  -> 

FAILED  ("FROM  CHECK_FILE:  "  & 

"END  ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DATA_ERROR  -> 

FAILED  ("FROM  CHECK_FILE:  "  & 

"DATA_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  LAYOUT_ERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"LAYOUT  ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  OTHERS  => 

FAILED  ("FROM  CHECK_FILE:  "  & 

"SOME  EXCEPTION  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

END  CHECK  FILE; 


D-4 


Sample  Output  Of 


Sample  Output  Of  Acceptance  Tests 


Test  CZIIOIA.ADA  should  produce  the  following  on  STANDARD  OUTPUT; 


-  NONAME  CZIIOIA-AB;  CHECK  REPORT  ROUTINES.  CHECKING  'COMMENT'. 

-  NONAME  CHECKING  'PUTMSG'  FOR  PROPER  OUTPUT. 

-  NO  NAME  THIS  LINE  IS  EXACTLY  'MAX  LEN'  LONG . 5... 60 _ 5... 70.. 

-  NONAME  THIS  COMMENT  HAS  A  WORD  TSaT  SPANS  THE  FOLD  POINT.  THIS 

COMMENT  FITS  EXACTLY  ON  TWO  LINES.  ...5... 60 _ 5... 70.. 

-  NONAME  THIS  COMMENT  HAS  A  WORD  THAT  ENDS  AT  THE  FOLD  POINT  ...70.. 

THE  SPACES  JUST  AFTER  THE  FOLD  POINT  SHOULD  BE  GONE. 

-  NONAME  THIS  COMMENT  HAS  A  WORD  THAT  BEGINS  AT  THE  FOLD  POINT. 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NO_NAME  THIS  COMMENT  HAS  SPACES  SPANNING  THE  FOLD  POINT.  ..5... 70 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NONAME 

THIS_COMMENT_IS  ONE_VERY_LONG  WORD_AND_SO_IT_SHOULD_BE_S 
PLIT_AT_THE_POLD  POINT. 

-  NO_NAME  CHECKING  THAT  REPORT  BODY  INITIALIZES  TO  'NONAME'  AND 

'FAILED'.  CHECKING  'RESULT'. 

****  NO  name  failed  ********************. 

-  PASS_TEST  CHECKING  'TEST'  AND  'RESULT'  FOR  'PASSED'. 

-  PASS  TEST  CHECKING  THAT  INDENTATION  OP  CONTINUATION  LINES  IS 

ADJUSTED  ACCORDING  TO  TEST  NAME  LENGTH. 

PASS  TEST  PASSED 

-  NONAME  CHECKING  'RESULT'  FOR  RESETTING  TO  'NO_NAME'  AND  'FAILED'. 
****  NO  NAME  FAILED  ********************. 

-  NO'NAME  CHECKING  THAT  INDENTATION  OF  CONTINUATION  LINES  IS  ADJUSTED 

ACCORDING  TO  TEST  NAME  LENGTH. 

-  FAIL  TEST  CHECKING  'FAILED'  AND  'RESULT'  FOR  'FAILED'. 

*  FAIL“TEST  checking  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

****  FAIL  TEST  FAILED  ********************, 

-  NATEST  CHECKING  'NOT_APPLICABLE'  AND  'RESULT'  FOR 

'NOT- APPLICABLE' . 

+  NATEST  CHECKING  'NOT_APPLICABLE' .  NOW  'RESULT'  SHOULD  BE 
'NOT-APPLICABLE' . 

++++  NATEST  NOT-APPLICABLE  ++++++++++++++++++++. 

-  FAIL_NA_TBST  CHECKING  'FAILED',  ' NOTAPPLI CABLE ' ,  AND  'RESULT'  FOR 

'FAILED' . 

+  FAIL_NA_TEST  CHECKING  'NOTAPPLICABLE' .  NOW  'RESULT'  SHOULD  BE 
'NOT-APPLICABLE' . 

*  PAILNATEST  CHECKING  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

+  FAILNATEST  CHECKING  ' NOTAPPLICABLE' .  NOW  'RESULT'  SHOULD  STAY 

'FAILED' . 

****  FAIL  NA  TEST  FAILED  ********************. 

-  NO  NAME“END  CZIIOIA. 


Sample  Output  Of  Acceptance  Tests 


Test  CZ1103A. ADA  should  produce  the  following  on  STANDARD_OUTPUT ; 


-  CZ1103A  CHECK  THAT  PROCEDURE  CHECKFILE  VORKS. 

-  CZ1103A  BEGIN  TEST  WITH  AN  EMPTY  FILE. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  BLANK  LINES. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  BLANK  LINES  AND  PAGES. 

-  CZ1103A  BEGIN  TEST  WITH  A  PILE  WITH  TRAILING  BLANKS. 

-  CZ1103A  FROM  CHECK_PILE:  THIS  IMPLEMENTATION  PADS  LINES  WITH 

BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITHOUT  TRAILING  BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  AN  END  OP  LINE  ERROR. 

*  CZ1103A  FROM  CHECK  PILE:  END  OP  LINE  EXPECTED  -  E  ENCOUNTERED. 

-  CZ1103A  FROM  CHECK~PILE:  UST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  THIS  LINE  WILL  CONTAIN  AN  #. 

-  CZ1103A  BEGIN  TEST  WITH  PILE  WITH  END  OF  PAGE  ERROR. 

*  CZ1103A  FROM  CHECKFILE:  END  OF  PAGE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK_PILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  THIS  LINE  WILL  CONTAIN  AN  @. 

-  CZ1103A  BEGIN  TEST  WITH  PILE  WITH  END  OF  FILE  ERROR. 

*  CZ1103A  FROM  CHECK_PILE:  END  OP_FILE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK  FILE:  UST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  THIS  LINE  WILL  CONTAIN  AN  X. 

-  CZ1103A  BEGIN  TEST  WITH  PILE  WITH  INCORRECT  DATA. 

*  CZ1103A  FROM  CHECK  FILE:  PILE  DOES  NOT  CONTAIN  CORRECT  OUTPUT  - 

EXPECTED  C  -  GOT  I. 

-  CZ1103A  FROM  CHECK  FILE:  UST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  LINE  WITH  C. 

****  CZ1103A  FAILED  ********************. 


VERSION  DESCRIPTION  DOCUMENT 
FOR  THE 

Ada  COMPILER  VALIDATION  CAPABILITY 
(Version  1.10) 


1  VERSION  IDENTIFICATION 

This  document  describes  the  Ada  Compiler  Validation  Capability 
(ACVC),  Version  1.10.  This  version  consists  of  3719  tests  in  Ml 82  test 
files.  Also,  there  are  three  units  in  four  files  and  three  tests  in  three 
files  which  support  the  running  of  the  ACVC  tests;  one  data  file 
containing  macro  definitions;  one  program  in  one  file  for  making  the  macro 
substitutions;  and  five  programs  in  165  files  which  are  used  to  aid  in  the 
validation  process.  The  differences  between  Version  1.9  and  1.10  are 
detailed  in  sections  2.0  through  4.0. 


2  TEST  MODIFICATIONS 


In  Version  1.10  of  the  ACVC, 
corresponding  tests  in  Version  1.9. 


38M  tests  were  modified  from 
Modifications  have  been  made: 


the 


a)  to  correct  tests  that  were  found  to  be  incorrect  in  previous 
versions  of  the  ACVC, 

b)  to  strengthen  the  tests  by  making  the  tests  more  comprehensive 
or  by  incorporating  more  cases  to  check,  and 

c)  to  bring  teat  code  into  conformance  with  the  coding  standards. 

The  following  tests  have  been  modified  from  Version  1.9: 


A2 8004a. ADA 
AE3101A.ADA 
B24204B.ADA 
B28001S.ADA 
B2A003B.ADA 
B37201A.ADA 
B39004L.ADA 
B5 9001  A. ADA 
B67001C.ADA 
B91001H.ADA 
B97101E.ADA 
BC3604A.ADA 
C32112B.ADA 
C34007A.ADA 
C34007P.ADA 
C35502F.TST 
C35503C.ADA 
C35503G.ADA 
C355030.ADA 
C35507E.ADA 


A35902C.ADA 
B22003A.ADA 
B24204C.ADA 
B28001T.ADA 
B2A003C.ADA 
B37312B.ADA 
-,^44001  A.  ADA 
B64001A.ADA 
B67001D.ADA 
B91003B.ADA 
B97 102c. ADA 
C32001B.ADA 
C32113A.ADA 
C34007D.ADA 
C34007S.ADA 
C35502K.ADA 
C35503D.TST 
C35503H.ADA 
C35503P.ADA 
C35507G.ADA 


A74106C.ADA 
B23003F.TST 
B28001J.ADA 
B28003A.ADA 
B33301A.ADA 
B39004G.ADA 
B49006A.ADA 
B67001A.ADA 
B85013C.ADA 
B95001A.ADA 
B97102E.ADA 
C32111A.ADA 
C321 15A.ADA 
C34007G.ADA 
C34012A.ADA 
C35502N.DEP 
C35503E.ADA 
C35503K.ADA 
C35505C.ADA 
C35507H.ADA 


ADI  A0 1  A. ADA 
B24204A.ADA 
B28001R.ADA 
B2A003A.ADA 
B36001A.ADA 
B39004J.ADA 
B49009A.ADA 
B67001B.ADA 
B86001B.ADA 
B97101A.ADA 
BC3105A.ADA 
C32112A.ADA 
C34004A.ADA 
C34007M.ADA 
C35102A.ADA 
C35502P.ADA 
C35503F.TST 
C35503L.ADA 
C35507C.ADA 
C35507I.DEP 


C35507J.DEP 

C35508E.ADA 

C355080.ADA 

C35802Y.DEP 

C35A06N.ADA 

C37206A.ADA 

C37213J.ADA 

C37215H.ADA 

C4 1308c. ADA 

C42007G.ADA 

C45332A.ADA 

C45532N.DEP 

C45621I.DEP 

C45621M.DEP 

C45621Q.DEP 

C45621U.DEP 

C45621Y.DEP 

C47008A.ADA 

C52104L.ADA 

C64103F.ADA 

C64104J.ADA 

C64109I.ADA 

C85018B.ADA 

C94002G.ADA 

CC1221A.ADA 

CE2102A.ADA 

CE2102E.ADA 

CE2102I.ADA 

CE2103B.TST 

CE2104D.ADA 

CE2 106b. ADA 

CE2107D.ADA 

CE2107H.ADA 

CE2108C.ADA 

CE2109C.ADA 

CE2111A.ADA 

CE2111E.ADA 

CE2115B.ADA 

CE2201F.ADA 

CE2204A.ADA 

CE2401C.ADA 

CE2402A.ADA 

CE2407A.ADA 

CE2411A.ADA 

CE3102B.TST 

CE3108A.ADA 

CE3111A.ADA 

CE3111E.ADA 

CE3 114b. ADA 


C35507K.ADA 
C35508G.ADA 
C35508P.ADA 
C35802Z.DEP 
C36204B.ADA 
C 37207 A. ADA 
C37215C.ADA 
C38102C.ADA 
C41320A.ADA 
C45242B.ADA 
C45532B.DEP 
C45614C.DEP 
C45621J.DEP 
C45621M.DEP 
C45621H.DEP 
C45621V.DEP 
C45621Z.DEP 
C47009A.ADA 
C54A24B.ADA 
C64104A.ADA 
C64104K.ADA 
C64109J.ADA 
C87B04B.ADA 
C96001A.ADA 
CC1311A.ADA 
CE2102B.ADA 
CE2102F.ADA 
CE2102J.ADA 
CE2104A.ADA 
CE2105A.ADA 
CE2107A.ADA 
CE2107E.ADA 
CE2107I.ADA 
CE2108D.ADA 
CE2110A.ADA 
CE2111B.ADA 
CE2111G.ADA 
CE2201A.ADA 
CE2201G.ADA 
CE2208B.ADA 
CE2401E.ADA 
CE2404A.ADA 
.,CE2408A.ADA 
C63002B.TST 
CE3103A.ADA 
CE3108B.ADA 
CE3111B.ADA 
CE3112A.ADA 
CE3115A.ADA 


C35507M.DEP 

C35508H.ADA 

C35703A.ADA 

C35904A.ADA 

C36204C.ADA 

C37209B.ADA 

C37215E.ADA 

C39005A.ADA 

C41402A.ADA 

C45252B.ADA 

C45532F.DEP 

C45621G.DEP 

C45621K.DEP 

C456210.DEP 

C45621S.DEP 

C45621W.DEP 

C46014A.ADA 

C47009B.ADA 

C64103B.ADA 

C64104H.ADA 

C641040.ADA 

C64109K.ADA 

C87B06A.ADA 

C97301B.ADA 

CC 131  IB. ADA 

CE2102C.TST 

CE2102G.ADA 

CE2102K.ADA 

CE2104B.ADA 

CE2105B.ADA 

CE2107B.ADA 

CE2107F.ADA 

CE2 108a. ADA 

CE2109A.ADA 

CE2110B.ADA 

CE2111C.ADA 

CE2111H.ADA 

CE2201B.ADA 

CE2201M.ADA 

CE2401A.ADA 

CE2401F.ADA 

CE2405B.ADA 

CE2409A.ADA 

CE3002C.TST 

CE3104A.ADA 

CE3109A.ADA 

CE3111C.ADA 

CE3112B.ADA 

CE3206A.ADA 


C35507N.DEP 

C35508J.DEP 

C357nB.ADA 

C35904B.ADA 

C37107A.ADA 

C37213H.ADA 

C37215G.ADA 

C41307D.ADA 

C42007F.ADA 

C45273A.ADA 

C45532J.DEP 

C45621H.DEP 

C45621L.DEP 

C45621P.DEP 

C45621T.DEP 

C45621X.DEP 

C47005A.ADA 

C4A012B.ADA 

C64103E.ADA 

C64104I.ADA 

C64109H.ADA 

C64109L.ADA 

C87B19A.ADA 

C99004A.ADA 

CC3603A.ADA 

CE2102D.ADA 

CE2102H.TST 

CE2103A.TST 

CE2104C.ADA 

CE2106A.ADA 

CE2107C.ADA 

CE2107G.ADA 

CE2108B.ADA 

CE2109B.ADA 

CE2110C.ADA 

CE2111D.ADA 

CE2115A.ADA 

CE2201C.ADA 

CE2202A.ADA 

CE2401B.ADA 

CE2401H.ADA 

CE2406A.ADA 

CE2410A.ADA 

CE3102A.ADA 

CE3107A.TST 

CE3110A.ADA 

CE3111D.ADA 

CE3114A.ADA 

CE3208A.ADA 
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CE3301A.ADA 

CE3402A.ADA 

CE3403A.ADA 

CE3403E.ADA 

CE3404C.ADA 

CE3406A.ADA 

CE3407A.ADA 

CE3408B.ADA 

CE3409C.ADA 

CE3410B.ADA 

CE3411A.ADA 

CE3413C.ADA 

CE3602C.ADA 

CE3605A.ADA 

CE3605E.ADA 

CE3704A.ADA 

CE3704E.ADA 

CE37040.ADA 

CE3706G.ADA 

CE3804A.ADA 

CE3804E.ADA 

CE3804K.ADA 

CE3806A.ADA 

CE3809A.ADA 

CE3905A.ADA 

CE3906A.ADA 

CE3906E.ADA 


CE3302A.ADA 

CE3402C.ADA 

CE3403B.ADA 

CE3403F.ADA 

CE3405A.ADA 

CE3406B.ADA 

CE3407B.ADA 

CE3408C.ADA 

CE3409D.ADA 

CE3410C.ADA 

CE3411C.ADA 

CE3601A.ADA 

CE3602D.ADA 

CE3605B.ADA 

CE3606A.ADA 

CE3704B.ADA 

CE3704F.ADA 

CE3706C.ADA 

CE3707A.ADA 

CE3804B.ADA 

CE3804F.ADA 

CE3804M.ADA 

CE3806C.ADA 

CE3809B.ADA 

CE3905B.ADA 

CE3906B.ADA 

CE3906F.ADA 


CE3303A.ADA 

CE3402D.ADA 

CE3403C.ADA 

CE3404A.ADA 

CE3405C.ADA 

CE3406C.ADA 

CE3407C.ADA 

CE3409A.ADA 

CE3409E.ADA 

CE3410D.ADA 

CE3412A.ADA 

CE3602A.ADA 

CE3603A.ADA 

CE3605C.ADA 

CE3606B.ADA 

CE3704C.ADA 

CE3704M.ADA 

CE3706D.ADA 

CE3708A.ADA 

CE3804C.ADA 

CE3804G.ADA 

CE3805A.ADA 

CE3806D.ADA 

CE3810A.ADA 

CE3905C.ADA 

CE3906C.ADA 

CE3908A.ADA 


CE3305A.ADA 

CE3402E.ADA 

CE3403D.ADA 

CE3404B.ADA 

CE3405D.ADA 

CE3406D.ADA 

CE3408A.ADA 

CE3409B,ADA 

CE3410A.ADA 

CE3410E.ADA 

CE3413A.ADA 

CE3602B.ADA 

CE3604A.ADA 

CE3605D.ADA 

CE3701A.ADA 

CE3704D.ADA 

CE3704N.ADA 

CE3706F.ADA 

CE3801A.ADA 

CE3804D.ADA 

CE3804I.ADA 

CE3805B.ADA 

CE3806E.ADA 

CE3901A.ADA 

CE3905L.ADA 

CE3906D.ADA 

E28005C.ABA 


In  addition,  the  following  support  files  and  tests  for  support  files 
were  modified  for  Version  1.10: 

MACHO. DFS  REPSPEC.ADA  REPBODY.ADA  CZ1101A.ADA 

CZ1102.ADA 


I 


3  TEST  DELETIONS 


The  following  26  testa  appear  in  ACVC  Version  1.9,  but  not  in  ACVC 
Version  1.10.  Several  of  the  deleted  teats  were  renamed  to  new  teat  names 
in  ACVC  1.10  to  conform  to  the  naming  conventions  provided  by  the 
Implementer 'a  Guide  or  to  reflect  a  change  in  teat  class. 


A37312A.ADA 

B34001S.ADA 

BC10AGA.AOA 

C910BDA.ADA 

CE3203A.ADA 

CE3405B.ADA 

E24101A.TST 


A41307A.ADA 

B86001C.DEP 

C35A03E.ADA 

C910BDB.ADA 

CE3301B.ADA 

CE3409F.ADA 

E66001D.ADA 


A4 1307c. ADA 
B86001D.TST 
C35A03R.ADA 
C950CHC.ADA 
CE3301C.ADA 
CE3410F.ADA 


B33006B.ADA 

B97102A.ADA 

C900ACA.ADA 

CE2210A.ADA 

CE3402B.ADA 

CE3412C.ADA 


4  NEW  TESTS 

The  following  623  testa  have  been  added  to  Version  1.10  of  the  ACVC  Test 
Suite.  A  teat  is  considered  "new"  if  the  test  name  did  not  exist  in  ACVC 
Version  1.9.  Several  of  the  new  tests  were  renamed  from  former  teats  in 
ACVC  Version  1.9  to  conform  to  the  naming  conventions  provided  by  the 
Implementer 'a  Guide  or  to  reflect  a  change  in  test  class. 


A980Q1A.ADA  AD1009M.DEP 
AD1C04D.DEP  AD3014C.DEP 
AD3015F.DEP  AD3015H.DEP 
AD7005A.ADA  AD7006A.ADA 
AD7102A.ADA  AD7103A.ADA 
B22003B.ADA  B24204D.ADA 
B2A003D.ADA  B2A003E.ADA 
B33301B.ADA  B34005B.ADA 
B34005K.ADA  B34005N.ADA 
B34006B.ADA  B34006E.ADA 
B34014B.ADA  B34014D.ADA 
B34014K.ADA  B34014M.ADA 
B34014S.ADA  B34014V.ADA 
B37201B.ADA  B37212B.ADA 
B64001B.ADA  B64110A.ADA 
B67001I.ADA  ,,^67001 J.  ADA 
B86001C.ADA  B86001D.ADA 
B86001G.ADA  B86001H.ADA 
B86001K.ADA  B86001L.ADA 
B860010.ADA  B86001P.ADA 
B86001S.ADA  B86001T.DEP 
B86001W.DEP  B86001X.TST 
B91003E.ADA  B95001C.ADA 
B97101G.ADA  B97101H.ADA 
BD5001A.ADA  BD5002A.ADA 


ADI 009V. DEP  AD1009W.DEP 
AD3014F.DEP  AD3015C.DEP 
AD3015K.DEP  AD7001B.ADA 
ADT101A.ADA  AD7101C.ADA 
AD7103C.ADA  AD7104A.ADA 
B24204E.ADA  B24204F.ADA 
B2A003F.ADA  B33002A.ADA 
B34005E.ADA  B34005H.ADA 
B34005Q.ADA  B34005T.ADA 
B34006H.ADA  B34006K.ADA 
B34014F.ADA  B34014I.ADA 
B340140.ADA  B34014Q.ADA 
B34014X.ADA  B34014Z.ADA 
B41307B.ADA  B44001B.ADA 
B66001D.ADA  B67001H.ADA 
B67001K.ADA  B85013D.ADA 
B86001E.ADA  B86001F.ADA 
B86001I.ADA  B86001J.ADA 
B86001M.ADA  B86OOIN.ADA 
B86001Q.ADA  B86001R.ADA 
B86001U.DEP  B86001V.DEP 
B86001Y.TST  B86001Z.TST 
B95069D.ADA  B95069E.ADA 
BC3102C.ADA  BC3123C.ADA 
BD5002B.ADA  BD5002C.ADA 
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BD5002D.ADA 

BD5006B.ADA 

BD5008A.ADA 

BD5103A.ADA 

C32115B.ADA 

C34005D.ADA 

C34005J.ADA 

C34006A.ADA 

C34009A.ADA 

C34014G.ADA 

C34014N.ADA 

C34014U.ADA 

C35505F.ADA 

C35A06R.ADA 

C37312A.ADA 

C91004B.ADA 

C98001C.ADA 

CC 1223 A. ADA 

CC3125C.ADA 

CC 3220 A. ADA 

CC3606A.ADA 

CD1009D.DEP 

CD1009H.DEP 

CD1009L.DEP 

CD1009Q.DEP 

CD1009U.DEP 

CD1C03A.DEP 

CD1C03F.DEP 

CD1C04A.DEP 

CD1C06A.DEP 

CD1D01D.ADA 

CD2A21B.DEP 

CD2A22A.DEP 

CD2A22E.DEP 

CD2A22I.DEP 

CD2A23C.DEP 

CD2A24B.DEP 

CD2A24F.DEP 

CD2A24J.DEP 

CD2A31D.DEP 

CD2A32D.DEP 

CD2A32H.DEP 

CD2A41B.DEP 

CD2A42A.DEP 

CD2A42E.DEP 

CD2A42I.DEP 

CD2A51C.DEP 

CD2A52B.DEP 

CD2A52H.DEP 

CD2A53B.DEP 

CD2A54A.DEP 

CD2A54G.DEP 


BD5002E.ADA 
BD5006C.ADA 
BD5101A.ADA 
BD5104A.ADA 
C34004C.ADA 
C34005F.ADA 
C34005L.ADA 
C34006D.ADA 
C34014A.ADA 
C34014H.ADA 
C34014P.ADA 
C34014W.ADA 
C35A060.ADA 
C35A06S.ADA 
C4 1307 A. ADA 
C91004C.ADA 
CC1221B.ADA 
CC3123A.ADA 
CC3125D.ADA 
CC3221A.ADA 
CD1009A.DEP 
CD1009E.DEP 
CDIOO9I.DEP 
CD1009N.DEP 
CD1009R.DEP 
CD1009X.DEP 
CD1C03B.ADA 
CD1C03G.DEP 
CD1C04B.DEP 
CD1D01A.ADA 
CD1D02A.ADA 
CD2A21C.DEP 
CD2A22B.DEP 
CD2A22F.DEP 
CD2A22J.DEP 
CD2A23D.DEP 
CD2A24C.DEP 
CD2A24G.DEP 
CD2A31A.DEP 
CD2A32A.DEP 
CD2A32E,DEP 
CD2A32I.DEP 
-•.CD2A41C.DEP 
CD2A42B.DEP 
CD2A42F.DEP 
CD2A42J.DEP 
CD2A51D.DEP 
CD2A52C.DEP 
CD2A52I.DEP 
CD2A53C.DEP 
CD2A54B.DEP 
CD2A54H.DEP 


BD5002F.ADA 

BD5006D.ADA 

BD5101B.ADA 

BE3301C.ADA 

C34005A.ADA 

C34005G.ADA 

C34005M.ADA 

C34006F.ADA 

C34014C.ADA 

C34014J.ADA 

C34014R.ADA 

C34014Y.ADA 

C35A06P.ADA 

C37213K.ADA 

C4 1307c. ADA 

C95040B.ADA 

CC1221C.ADA 

CC3123B.ADA 

CC3126A.ADA 

CC3222A.ADA 

CD1009B.DEP 

CD1009F.DEP 

CD1009J.DEP 

CD10090.DEP 

CD1009S.DEP 

CD1009Y.DEP 

CD1C03C.TST 

CD1C03H.DEP 

CD1C04C.DEP 

CD1D01B.ADA 

CD1D03A.ADA 

CD2A21D.DEP 

CD2A22C.DEP 

CD2A22G.DEP 

CD2A23A.DEP 

CD2A23E.DEP 

CD2A24D.DEP 

CD2A24H.DEP 

CD2A31B.DEP 

CD2A32B.DEP 

CD2A32F.DEP 

CD2A32J.DEP 

CD2A41D.DEP 

CD2A42C.DEP 

CD2A42G.DEP 

CD2A51A.DEP 

CD2A51E.DEP 

CD2A52D.DEP 

CD2A52J.DEP 

CD2A53D.DEP 

CD2A54C.DEP 

CD2A54I.DEP 


BD5005B.ADA 

BD5006J.ADA 

BD5102A.ADA 

C32111B.ADA 

C34005C.ADA 

C34005I.ADA 

C340050.ADA 

C34007J.ADA 

C34014E.ADA 

C34014L.ADA 

C34014T.ADA 

C35505E.ADA 

C35A06Q.ADA 

C37213L.ADA 

C41309A.ADA 

C98001B.ADA 

CC1221D.ADA 

CC3125B.ADA 

CC3127A.ADA 

CC3223A.ADA 

CD1009C.DEP 

CD1009G.DEP 

CD1009K.DEP 

CD1009P.DEP 

CD1009T.DEP 

CD1009Z.DEP 

CD1C03E.DEP 

CDICO3I.ADA 

CD1C04E.DEP 

CD1D01C.ADA 

CD2A21A.DEP 

CD2A21E.DEP 

CD2A22D.DEP 

CD2A22H.DEP 

CD2A23B.DEP 

CD2A24A.DEP 

CD2A24E.DEP 

CD2A24I.DEP 

CD2A31C.DEP 

CD2A32C.DEP 

CD2A32G.DEP 

CD2A41A.DEP 

CD2A41E.DEP 

CD2A42D.DEP 

CD2A42H.DEP 

CD2A51B.DEP 

CD2A52A.DEP 

CD2A52G.DEP 

CD2A53A.DEP 

CD2A53E.DEP 

CD2A54D.DEP 

CD2A54J.DEP 


1 


5 


CD2A61A.DEP  CD2A61B.DEP 

CD2A61E.DEP  CD2A61F.DEP 

CD2A61I.DEP  CD2A61J.DEP 

CD2A62A.DEP  CD2A62B.DEP 

CD2A63A.DEP  CD2A63B.DEP 

CD2A64A.DEP  CD2A64B.DEP 

CD2A65A.DEP  CD2A65B.DEP 

CD2A66A.DEP  CD2A66B.DEP 

CD2A71A.DEP  CD2A71B.DEP 

CD2A72A.DEP  CD2A72B.DEP 

CD2A73A.DEP  CD2A73B.DEP 

CD2A74A.DEP  CD2A74B.DEP 

CD2A75A.DEP  CD2A75B.DEP 

CD2A76A.DEP  CD2A76B.DEP 

CD2A81A.TST  CD2A81B.TST 

CD2A81E.TST  CD2A81F.TST 

CD2A83B.TST  CD2A83C.TST 

CD2A83G.TST  CD2A84B.DEP 

CD2A84E.DEP  CD2A84F.DEP 

CD2A84I.DEP  CD2A84K.DEP 

CD2A84N.DEP  CD2A87A.TST 

CD2A91C.TST  CD2A91D.TST 

CD2B11B.DEP  CD2B11C.DEP 

CD2B11F.DEP  CD2B11G.DEP 

CD2B16A.DEP  CD2C11A.DEP 

CD2C11D.DEP  CD2C11E.DEP 

CD2D13A.DEP  CD3014A.DEP 

CD3014E.DEP  CD3015A.DEP 

CD3015E.DEP  CD3015G.DEP 

CD3015L.DEP  CD302U.DEP 

CD4051A.DEP  CD4051B.DEP 

CD5003B.DEP  CD5003C.DEP 

CD5003F.DEP  CD5003G.DEP 

CD50073.DEP  CD5011A.DEP 

CD5011D.DEP  CD5011E.DEP 

CD5011H.DEP  CD5011I.DEP 

CD5011M.DEP  CD5011N.DEP 

CD5011R.DEP  CD5011S.DEP 

CD5012C.DEP  CD5012D.DEP 

CD5012G.DEP  CD5012H.DEP 

CD5012L.DEP  CD5012M.DEP 

CD5013C.DEP  CD5013D.DEP 

CD5013G.DEP  '"CD501 3H.DEP 

CD5013L.DEP  CD50-13M.DEP 

CD5013R.DEP  CD5013S.DEP 

CD5014C.DEP  CD5014D.DEP 

CT)5014G.DEP  CD5014H.DEP 

CD5014K.DEP  CD5014L.DEP 

CD50140.DEP  CD5014R.DEP 

CD5014U.DEP  CD5014V.DEP 

CD50l4Y.DrEP  CD5014Z.DEP 

CD7004C.TST  CD7004D.TST 


CD2A61C.DEP  CD2A61D.DEP 

CD2A61G.DEP  CD2A61H.DEP 

CD2A61K.DEP  CD2A61L.DEP 

CD2A62C.DEP  CD2A62D.DF:P 

CD2A63C.DEP  CD2A63D.DEP 

CD2A64C.DEP  CD2A64d.DEP 

CD2A65C.DEP  CD2A65D.DEP 

CD2A66C.DEP  CD2A66D.DEP 

CD2A71C.DEP  CD2A71D.DEP 

CD2A72C.DEP  CD2A72D.DEP 

CD2A73C.DEP  CD2A73D.DEP 

CD2A74C.DEP  CD2A74D.DEP 

CD2A75C.DEP  CD2A75D.DEP 

CD2A76C.DEP  CD2A76D.DEP 

CD2A81C.TST  CD2A81D.TST 

CD2A81G.TST  CD2A83A.TST 

CD2A83E.TST  CD2A83F.TST 

CD2A84C.DEP  CD2A84D.DEP 

CD2A84G.DEP  CD2A84H.DEP 

CD2A84L.DEP  CD2A84M.DEP 

CD2A91A.TST  CD2A91B.TST 

CD2A91E.TST  CD2A95A.TST 

CD2B11D.DEP  CD2B11E.DEP 

CD2B15B.DEP  CD2B15C.DEP 

CD2C11B.DEP  CD2C11C.DEP 

CD2D11A.DEP  CD2D11B.DEP 

CD3014B.DEP  CD3014D.DEP 

CD3015B.DEP  CD3015D.DEP 

CD3015I.DEP  CD3015J.DEP 

CD403U.DEP  CD4041A.DEP 

CD4051C.DEP  CD4051D.DEP 

CD5003D.DEP  CD5003E.DEP 

CD5003H.DEP  CD5003I.DEP 

CD5011B.DEP  CD5011C.DEP 

CD5011F.DEP  CDSOIIG.DEP 

CD5011K.DEP  CD5011L.DEP 

CD50110.DEP  CD5011Q.DEP 

CD5012A.DEP  CD5012B.DEP 

CD5012E.DEP  CD5012F.DEP 

CD5012I.DEP  CD5012J.DEP 

CD5013A.DEP  CD5013B.DEP 

CD5013E.DEP  CD5013F.DEP 

CD5013I.DEP  CD5013K.DEP 

CD5013N.DEP  CD50130.DEP 

CD5014A.DEP  CT)5014B.DEF 

CD5014E.DEP  CD5014F.DEP 

CD5014I.DEP  CI)5014J.DEP 

CD5014M.DEP  CD5014N.DEP 

CD5014S.DEP  CD5014T.DEP 

CD5014W.DEP  CD5014X.DEP 

CD7003A.TST  CD7004A.TST 

CD7005B.TST  CD7005E.TST 


CD7006B.TST  CD7006E.TST  CD7007B.ADA  CD7007C.TST 
CD7101B.TST  CD7101D.ADA  CD7101E.DEP  CD7101F.DEP 
CD7101G.TST  CD7102P.TST  CD7103B.TST  CD7103D.TST 
CD7104B.TST  CD7105A.ADA  CD7203B.ADA  CD7204B.ADA 
CD7204C.DEP  CD7205C.DEP  CD7205D.DEP  CE2102L.ADA 
CE2102M.ADA  CE2102N.ADA  CE21020.ADA  CE2102P.ADA 
CE2102Q.ADA  CE2102R.ADA  CE2102S.ADA  CE2102T.ADA 
CE2102U.ADA  CE2102V.ADA  CE2102W.ADA  CE21C2X.ADA 
CE2102Y.ADA  CE2103C.ADA  CE2103D.ADA  CE2107L.ADA 
CE2108E.ADA  CE2108F.ADA  CE2108G.ADA  CE2108H.ADA 
CE2110D.ADA  CE2111F.ADA  CE2111I.ADA  CE2201H.ADA 
JE2201I.ADA  CE2201J.ADA  CE2201K.ADA  CE2201L.ADA 
CE2201M.ADA  CE2201N.ADA  CE2204C.ADA  CE2204D.ADA 
CE2205A.ADA  CE2401I.ADA  CE2401J.ADA  CE2401K.ADA 
CE2401L.ADA  CE2404B.ADA  CE2407B.ADA  CE2408B.ADA 
CE2409B.ADA  CE2410B.ADA  CE3102D.ADA  CE3102E.ADA 
CE3102F.ADA  CE3102G.ADA  CE3102H.ABA  CE3102I.ADA 
CE3102J.ADA  CE3102K.ADA  CE3104B.ADA  CE3104C.ADA 
CE3107B.ADA  CE3112C.ADA  CE3112D.ADA  CE3404D.ADA 
CE3411B.ADA  CE3604B.ADA  CE3801B.ADA  CE3804H.ADA 
CE3804J.ADA  CE3804L.ADA  CE3804N.ADA  CE38040.ADA 
CE3804P.ADA  CE3806B.ADA  CE3806F.ADA  CE3806G.ADA 
CE3806H.ADA  CE3810B.ADA  E2420U.TST  ED1D04A.DEP 
ED2A26A.DEP  ED2A56A.DEP  ED2A86A.TST  ED7004B.TST 
ED7005C.TST  ED7005D.TST  ED7006C.TST  ED7006D.TST 
EE3203A.ADA  EE3301B.ADA  EE3402B.ADA  EE3405B.ADA 
EE3409F.ADA  EE3410F.ADA  EE3412C.ADA 


In  addition,  one  new  support  unit  (in  one  file),  a  system  of  programs 
(in  165  files)  designed  to  aid  in  the  validation  process,  and  a  macro 
substitution  program  have  been  added  to  ACVC  Version  1.10: 

SPPRTI3.ADA  (The  specification  of  a  package  whose  body  must  be 
provided  by  the  user.) 

AVAT  (One  package  in  files  DATSPEC.ADA  and  DATBODY . ADA ; 

all  other  units  in  files  whose  names  have  the  form 
"AVATHiJ .ext"  where  each  J  is  replaced  by  a  letter 
or  digit  and  "ext"  is  either  "ADA"  or  "TST".) 

MACROSUB  A  program  which  modifies  the  "TST"  tests  inserting  the 

values  supplied  in  the  file  MACRO. DFS.  MACRO. DFS 
must  be  modified  to  reflect  the  implementation  dependent 
■  j,  values  of  the  compiler. 


ACVC  1.10  Tape  Information 


1  INTRODUCTION 

The  ACVC  1.10  test  files  are  written  on  one  tape  volume  in  UNIX  TAR 
format.  One  of  the  files  on  this  tape  is  ACVC10.LST,  which  contains  the  names 
of  all  tests  in  the  ACVC  test  suite. 


2  TAPE  FORMAT 

This  tape  was  written  in  UNIX  TAR  format  at  1600  bpi  density,  20  records 
as  the  block  size.  An  example  of  the  directory  path  and  neime  of  the  tests  is 

./boss/acvc 10/test3/atest3/a2/a21001a .ada 


3  SPECIAL  NOTE 

Attention  should  be  given  to  four  ACVC  tests  that  contain  a  line 

feed — ASCII  control  character  LF — as  part  of  the  compiler  test.  UNIX  TAR  uses 
a  line  feed  to  designate  the  end  of  the  text  line.  The  following  tests 

contain  the  ASCII  control  character  LF  and  are  Internally  documented  as  such. 

a22006c.ada  b25002b.ada 

a22006e.ada  b26005a.ada 


4  TEST  MODIFICATIONS 

The  Ada  tests  will  be  periodically  updated  and  corrected.  Their 
correctness  is  not  guaranteed  either  by  the  ACVC  Maintenance  Organization 
(AMO)  or  by  its  contractor.  Please  report  errors  in  writing  to 

Mr.  Steven  P.  Wilson 

ACVC  Maintenance  Organization 

asd/scol  '""  ' 

Wright-Patterson  AFB,  OH  45433-6503 


You  will  receive  notification  of  changes  to  this  version  on  a  periodic 
basis.  Please  notify  the  AMO  of  any  change  of  address. 
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1  Scope. 

1.1  Identification. 

This  is  the  Ada  Compiler  Validation  Capability  (ACVC)  User's  Guide. 
This  document  details  the  use  of  Version  1.10  of  the  ACVC. 


1.2  Purpose. 

This  user's  guide  describes  the  ACVC  test  suite,  its  use,  and 
Interpretation  of  the  test  results.  It  should  be  read  by  anyone  who  wishes 
to  use  the  ACVC  to  test  an  implementation  of  the  Ada  language. 


1.3  Introduction. 

The  primary  purpose  of  the  ACVC  is  to  help  decide  whether  an  Ada 

translator/compiler  conforms  to  ANSI/HIL-STD-1815A,  the  Reference  Manual 
for  the  Ada  Programming  Language  (RM).  The  RH  is  also  known  as  the  Ada 
Standard.  The  ACVC  is  maintained  by  the  ACVC  Maintenance  Organization 
(AMO)  under  the  direction  of  the  Ada  Validation  Office  (AVO)  of  the  Air 
Force's  Ada  Joint  Program  Office  (AJPO).  The  three  main  components  of  the 
ACVC  are: 

.  An  Implementers'  guide  that  describes  the  implementation 

Implications  of  the  RM  and  the  conditions  that  are  checked  by  each 
validation  test  program. 

.  A  suite  of  validation  test  programs  that  are  submitted  to  a 

compiler. 

.  Validation  support  tools  that  assist  in  determining  system 

capabilities,  preparing  tests  for  compilation,  and  analyzing  the 
results  of  execution. 


2  References. 


1.  ANSI/MIL-STD-1815A  (The  Reference  Manual  for  the  Ada  Programming 
Language),  22  January  1983. 

2.  Ada  Compiler  Validation  Procedures  and  Guidelines,  Ada  Joint 
Program  Office,  1  January  1987. 

3.  Ada  Compiler  Validation  Capability  Implementers'  Guide,  SofTech, 
Inc.,  1  December  1986. 

4.  ACVC  Version  1.10  Version  Description  Document,  SofTech,  Inc., 

1  December  1987. 
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ACVC  Test  PesiCT  and  Coding  Standards,  SofTech,  Inc., 
1  December  1986. 


3  Instruction  For  Use. 

3.1  Ada  Compiler  Validation  Capability  Implementers'  Guide. 

All  of  the  ACVC  test  programs  are  based  on  objectives  given  in  the  Ada 
Compiler  Validation  Capability  Implementers'  Guide  (AIG).  The  AIG 
basically  follows  the  RM.  However,  the  AIG  contains  additional  sections 
which  further  clarify  the  rules  of  the  language,  details  the  interpretation 
of  any  ambiguities  in  the  RH,  and  presents  objectives  and  guidelines  for 
the  tests. 


3.2  Validation  Test  Programs. 

The  ACVC  test  suite  is  composed  of  various  test  programs  designed  to 
ensure  that  a  compiler  correctly  conforms  to  all  aspects  of  the  RM.  The 
test  suite  also  attempts  to  ensure  that  the  implementation  does  not  add  any 
illegal  extentions  to  the  language. 

The  goals  of  the  ACVC  include: 

.  Maximizing  the  amount  of  information  derived  from  a  validation 
attempt;  in  particular,  identifying  as  many  nonconformances  as 
possible. 

.  Minimizing  the  effort  needed  to  test  a  compiler;  in  particular, 
the  effort  needed  to  a)  adapt  the  tests  to  a  particular  compiler 
environment,  and  b)  determine  which  tests  passed  and  which 


.  Minimizing  the  effort  needed  to  determine  if  a  test  is  correct 
(that  is,  if  it  uses  an  appropriate  algorithm  to  check  the 
objective)  when  failed  on  a  compiler. 

.  A  thorough  coverage  of  the  language  and  the  possible 
implementations  of  its  features. 

.  Making  the  tests  understandable  and  maintainable. 
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3.2.1  Test  Naming  Conventions. 

Test  names  have  the  form  <name>.<type>.  The  <name>  component  is 
composed  of  seven  to  nine  characters.  The  interpretation  of  each  character 
is  described  belov,  where  the  first  colunui  indicates  the  character 
position(s)  and  the  second  column  gives  the  corresponding  meaning: 

1  Test  classification  (letter)  -  identifies  the  class  of  the 
test  (see  Classifications). 

2  AIG  chapter  (hexadecimal)  -  identifies  the  chapter  vhi  h 
contains  the  objective  being  tested. 

3  Section  (hexadecimal)  -  identifies  the  section  within  the 
above  chapter. 

4  Sub-section  (alpha-numeric)  -  identifies  the  sub-section 
within  the  above  section. 

5,  6  Test  objective  (decimal)  -  identifies  the  objective,  within 
the  above  sub-section,  being  tested. 

7  Sub-objective  (letter)  -  indicates  a  sub-objective  of  the 
above  objective. 

8  Compilation  sequence  (alpha-numeric)  -  indicates  the 
compilation  order  of  multiple  files  that  comprise  a  single 
test  (0  is  compiled  first).  This  position  is  present  only  if 
the  test  is  composed  of  multiple  files. 

9  Main  subprogram  indication  (character  'M')  -  indicates  which 
file  of  a  test  set  contains  the  main  procedure.  This  position 
is  present  only  for  one  file  of  a  multi-file  test. 


The  <type>  component  is  a  three-character  extension  which  identifies 
the  type  of  the  test  (see  Type  Extensions). 

Characters  2-7  of  the  <name>  component  uniquely  identify  every  test 
objective.  Each  individual  objective  has  only  a  single  classification  and 
type  designation  associated  with  it.  The  classification  and  type  of  a  test 
indicates  its  expected  compilation/execution  results. 


3. 2. 1.1  Classifications. 

The  test  classifications  are  A,  B,  C,  D,  E,  and  L.  Tests  that  come 
under  classes  A,  C,  D,  and  E  are  also  considered  executable  tests. 


3. 2. 1 . 1. 1  Class  A. 

Class  A  tests  ensure  acceptance  (compilation)  of  certain  language 
constructs  which  cannot  be  verified  at  run  time.  There  are  no  testing 
conditions  within  them.  These  tests  are  expected  to  execute  successfully  - 
they  simply  report  'PASSED'.  An  implementation  is  considered  to  have 
failed  any  test  for  which  it  does  not  indicate  otherwise. 
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3. 2. 1.1. 2  Class  B. 

Class  B  tests  check  that  illegal  constructs  are  caught  and  that  there 
are  no  illegal  extentions  to  the  language.  These  tests  are  expected  to 
fail  compilation.  They  are  graded  as  'PASSED'  if  all  of  the  indicated 
errors  in  the  test  are  caught  and  no  legal  constructs  are  rejected.  An 
implementation  is  considered  to  have  failed  any  test  for  which  an  error  is 
not  caught  or  a  legal  construct  is  rejected. 

Lines  containing  errors  which  must  be  caught  are  marked  ' —  ERROR:'. 
This  error  comment  may  also  Include  a  very  brief  indication  of  what  makes 
the  construct  illegal.  Lines  containing  legal  constructs  which  must  be 
accepted  are  marked  ' —  OK.'. 

The  following  rules  apply  in  satisfying  the  pass  criteria: 

.  The  compiler  rejects  a  test  which  contains  only  a  single  error. 

.  The  compiler  displays  an  error  message  for  all  of  the  ' —  ERROR:' 
indications  in  a  test  with  multiple  errors. 

.  All  lines  marked  ' —  OK.'  are  accepted. 

.  Split  tests  can  be  created  (see  Modifying  Tests). 


3. 2. 1.1. 3  Class  C. 

Class  C  tests  check  the  run-time  system  and  ensure  that  verifiable 
constructs  are  implemented  correctly.  These  tests  are  expected  to  execute. 
The  tests  will  indicate  either  'PASSED',  'FAILED',  or  'NOT_APPLICABLE' 
based  on  the  conditions  tested.  An  implementation  is  considered  to  have 
failed  any  test  for  which  it  does  not  indicate  otherwise. 


3. 2. 1.1. 4  Class  D. 

Class  D  tests  are  capacity  tests.  These  tests  are  expected  to  execute 
successfully  if  no  errors  are  reported  during  compilation.  If  an  error  is 
reported  during  compilation,  it  must  be  an  error  associated  with  the 
capacity  being  tested,  in  which  case  the  test  is  considered  inapplicable. 
Otherwise,  an  implementation  may  be  considered  to  have  failed  any  test  for 
which  it  does  not  indicate  differently;  such  failure  should  be  reported  to 
the  AVO  for  a  ruling. 


3. 2. 1.1.5  Class  E. 

Class  E  tests  check  implementation-dependent  options  and  the 
resolution  of  ambiguities  in  the  RM.  These  tests  are  expected  to  execute 
successfully.  Tests  which  execute  print  comments  to  Indicate  how  the 
options  or  ambiguities  are  handled.  The  source  code  for  each  test  lists 
specific  pass/fail  criteria.  For  some  tests,  these  criteria  are  indicated 
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at  execution  time.  These  criteria  are  compared  to  the  comments  to  make  a 
grading  determination.  An  implementation  is  considered  to  have  failed  any 
test  for  which  it  does  not  indicate  otherwise. 


3. 2. 1.1. 6  Class  L. 

Class  L  tests  ensure  that  all  library  unit  dependencies  within  a 
program  are  satisfied  before  said  program  can  be  linked  and  executed,  and 
that  circularity  among  units  is  not  allowed.  These  tests  are  expected  to 
fail  at  link  time;  however,  failure  to  compile  may  be  acceptable  for  some 
implementations.  These  tests  are  graded  as  'PASSED'  if  they  do  not 
successfully  complete  the  link  phase.  Any  test  which  begins  execution  is 
graded  as  'FAILED'. 

For  tests  which  might  possibly  fail  at  compile  time,  the  lines 
containing  the  illegal  constructs  are  marked  ' —  ERROR:'. 


3.2. 1.2  Type  Extensions. 

The  type  extensions  and  their  meanings  are: 

ADA  -  These  tests  check  the  standard  features  of  the  language  that 
must  be  implemented  by  all  compilers.  They  are  expected  to  be 
compiled/executed  unmodified  and  must  be  successfully  processed 
by  all  implementations. 

DEP  -  These  tests  involve  optional,  implementation-dependent  features 
of  the  language.  Each  test  concerned  with  supported  features 
must  be  successfully  processed  as  indicated  by  its 

classification.  Tests  concerned  with  unsupported  features  are 
considered  inapplicable,  provided  they  are  processed  as 

described  below: 

.  Class  B  tests  should  be  successfully  compiled. 

.  Executable  tests  must  be  rejected  at  compile  time  as 
described  in  the  test's  applicability  criteria. 

TST  -  These  tests  also  check  implementation-dependent  features  of  the 
language.  They  contain  macros  for  the  substitution  of  certain 
implementation-dependent  values  (see  Macro  Substitutions). 
Generally,  each  of  these  tests  is  expected  to  be  successfully 
processed  as  Indicated  by  its  classification.  However,  some  of 
the  tests  may  be  concerned  with  unsupported  features  and 
therefore  are  treated  as  described  for  DEP  tests. 


3.2.2  Coding  Standards. 

To  help  meet  the  goals  of  the  ACVC,  certain  coding  standards  are 
followed. 


ACVC  User's  Guide  (ACVC  Version  1.10) 


3. 2. 2.1  General. 

Some  general  test  writing  standards  include: 

.  Tests  are  written  using  the  basic  55-character  character-set  (26 
capital  letters,  10  digits,  and  19  punctuation  marks). 

.  Maximum  line  length  is  72  characters,  except  as  noted  in  certain 
OEP  and  TST  tests. 

.  Numeric  values  are  generally  in  the  range  (-128.. 127).  However, 
if  necessary,  they  can  be  within  the  range  (-2048. . 2047) ,  a 
maximum  of  12  bits. 

.  Tests  are  written  using  as  few  Ada  features  as  are  necessary  to 
write  a  self-checking  executable  test  that  is  not  too  difficult  to 
read  or  modify. 

To  help  ensure  a  thorough  coverage  of  the  language,  and  to  promote 
understandability  and  maintainability,  many  objectives  are  divided  into 
sub-objectives,  with  some  checked  in  a  single  test  file  and  others  checked 
in  separate  test  files.  For  example,  if  a  test  objective  is  concerned  with 
some  property  of  scalar  types,  then  individual  subtests  check: 

.  INTEGER,  CHARACTER,  BOOLEAN,  and  a  user-defined  enumeration  type, 
all  in  one  test  file  since  we  expect  all  of  these  types  to  be 
implemented. 

.  FLOAT  and  a  user-defined  floating-point  type  in  a  separate  test 
file. 

.  A  fixed-point  type  in  another  separate  test  file. 

Sub-objectives  which  are  difficult  to  test  are  also  tested  in  separate 
tests  files. 


3. 2. 2. 2  Header  Format. 

The  following  header  is  placed  at  the  beginning  of  all  new  and 
modified  tests: 

—  filename. 

—  OBJECTIVE: 


—  SEPARATE  FILES: 


—  APPLICABILITY  CRITERIA: 
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—  PASS/FAIL  CRITERIA: 


—  MACRO  SUBSTITUTIONS: 


—  HISTORY: 

ccc  mm/dd/yy  coounent  about  change. 


The  purpose  of  each  section  is: 

filename  -  identical  to  the  actual  name  of  the  file. 

objective  -  describes  the  test's  objective  and  explains 

the  exact  conditions  or  sub-objectives 
presently  being  tested. 

separate  files  -  identifies  all  of  the  component  files  of  a 

multiple  file  test,  vith  a  brief  description 
of  each  file. 

applicability  criteria  -  details  under  what  conditions  the  test  can  be 

ruled  inapplicable. 

pass/fail  criteria  -  explains  hov  to  interpret  the  run-time 

results  for  grading  the  test. 

macro  substitution  -  identifies  the  macros  in  the  test  which  must 

be  substituted  and  a  brief  description  of 
what  the  replacement  value  represents. 

history  -  details  who  has  made  changes  to  the  test, 

when,  and  what  those  changes  were. 

The  file  name,  objective  and  history  sections  are  always  present.  The 
separate  files,  applicability  criteria,  pass/fail  criteria  and  macro 
substitutions  sections  are  present  only  for  tests  which  have  such 
conditions. 


3. 2. 2. 3  Test  Body  Format. 

Note:  test  body  refers  to  the  code  which  is  compiled/executed  and  is 
not  necessarily  synonymous  with  an  Ada  unit  body. 

The  names  of  all  library  units  correspond  to  the  name  of  the  test  to 
which  they  are  associated. 

Class  B  tests  are  generally  library  procedures.  Other  units  are  used 
when  required  by  the  objective,  in  which  case  there  is  not  necessarily  a 
main  subprogram. 
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The  main  subprogram  of  all  executable  tests  is  a  procedure.  The  name 
of  this  procedure  is  identical  to  the  name  of  the  test. 


3. 2. 2. 3.1  Test  Initialization/Reporting  And  Test  Objective  Blocks. 

The  test  body  of  an  executable  test  has  the  following  logical 
execution  sequence: 

1.  Call  to  REPORT. TEST,  which  prints  the  test  identifier  and 
description. 

2.  Elaboration  of  objective-related  declarations. 

3.  Testing  of  the  objective  -  calls  to  REPORT. FAILED  and 
REPORT. N0T_APPLI CABLE  as  appropriate. 

4.  Call  to  REPORT. RESULT,  which  prints  the  pass/fail  message. 

The  tests  generally  consist  of  a  single  procedure  with  the  objective  being 
tested  within  an  inner  DECLARE  block.  If  the  test  objective  is  divided 
into  multiple  sub-objectives,  each  sub-objective  is  tested  within  a 
separate  DECLARE  block.  For  objectives  which  require  packages  as  library 
units,  package  declarations  and  elaborations  are  arranged  to  result  in  the 
previously  described  execution  sequence. 


3. 2. 2. 3. 2  Ada  Unit  Bodies. 

The  format  of  the  statements  and  language  constructs  is  designed  to 
make  the  syntactic  and  semantic  structure  of  the  test  program  apparent.  In 
an  attempt  to  defeat  high-quality  optimizing  compilers,  which  may  execute 
or  remove  the  critical  portion  of  a  test  at  compile  time,  certain  coding 
practices  have  been  devised.  These  practices  include  calling  identity 
functions,  using  objects  in  statements  which  appear  to  have  no 
significance,  and  using  IF-THEN-ELSE  statements  instead  of  just  a  simple  IF 
statement . 


3.2.3  Hacro  Substitutions. 

TST  type  tests  contain  macros  which  represent  implementation-dependent 
characteristics  of  the  language.  The  macros  are  given  as  identifiers  which 
begin  with  a  dollar  sign  <$).  Each  macro  must  be  replaced  with  an 
appropriate  textual  value. to  make  the  tests  suitable  for  compilation. 

The  substitutions  can  be  done  automatically  by  using  the  HACROSUBS 
program  distributed  with  the  ACVC.  This  program  will  request  the 
replacement  value  for  each  macro  and  then  edit  all  the  TST  tests  in  the 
suite  to  make  the  substitution. 

Appendix  A  contains  a  description  of  all  of  the  macros  used  in  the 
test  suite. 
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3.2.4  Processing  The  ACVC  Test  Programs. 

Processing  of  the  test  suite  consists  of: 

1.  Compiling  class  B  tests. 

2.  Compiling  and  linking  class  L  tests. 

3.  Compiling,  linking,  and  executing  class  A,  C,  0,  and  B  tests. 

It  is  recommended  that  the  suite  be  processed  by  chapter.  Generally,  the 
test  suite  is  processed  within  a  single  prograun  library  which  must  be 
initialized  as  described  below. 


3. 2. 4.1  Prerequisites. 

The  following  prerequisites  must  be  met  before  processing  the  test 
suite: 

1.  All  of  Ada  must  be  implemented  -  the  test  suite  attempts  to  cover 
the  entire  Ada  language. 

2.  The  support  package  REPORT  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Package  Report). 

3.  The  support  procedure  CHECKFILB  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Procedure  Checkfile). 

4.  The  support  package  SPPRT13  must  be  compiled  and  loaded  into  the 
program  library  (see  Package  Spprtl3). 


3. 2.4. 2  Dependencies  Among  Tests. 

Test  files  which  use  character  position  8  (compilation  sequence)  in 
their  names  have  an  inherent  dependency.  These  test  files  must  be  compiled 
successively  and,  for  class  A,  C,  D,  E,  and  L  tests,  linked  together. 

Some  of  the  executable  file  I/O  tests  create  a  data  file  that  is  to  be 
used  by  a  subsequent  test.  In  these  instances,  the  tests  must  be  run  in 
sequence,  without  deleting  the  data  file  that  was  created.  The  tests  which 
create  such  a  file,  and  the  tests  that  depend  on  that  file  are: 

CE2108A  must  be  followed  by  CE2108B. 

CE2108C  must  be  followed  by  CE2108D. 

CE3112A  must  be  followed  by  CE3112B. 
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3. 2. 4. 3  Test  Applicability. 

Certain  tests  in  the  suite  are  concerned  with  optional, 
implementation-dependent  features  of  the  language.  Hence,  some  of  these 
tests  may  not  be  applicable  to  all  implementations.  The  applicability  of 
each  test  is  based  on  the  criteria  given  in  the  test  file.  The  handling  of 
tests  concerned  with  unsupported  features  is  described  above  under  Type 
Extensions. 

For  executable  tests,  lines  containing  these  implementation-dependent 
features  are  marked  " —  NA  »>  ERROR.".  If  an  implementation  does  not 
support  the  specified  feature,  then  these  constructs  must  be  rejected.  If 
the  constructs  so  indicated  are  rejected,  then  the  test  is  considered 
inapplicable  -  any  other  errors  reported  are  Ignored.  If  the  constructs  so 
indicated  are  not  rejected,  then  the  test  remains  applicable  and  must 
execute  successfully. 

All  the  implementation-dependent  tests  are  compiled,  and  executed  if 
compiled  successfully,  during  a  validation  attempt  -  except  those  tests 
which  require  a  floating-point  DIGITS  value  that  exceeds  SYSTEM. MAX_DIGITS. 
All  results  for  a  particular  feature  must  be  consistent  (i.e.,  all  'PASSED' 
or  all  'NOT-APPLICABLE'). 

Appendix  B  contains  the  test  applicability  criteria  for  all  the 
implementation-dependent  tests. 


3. 2. 4. 4  Test  Disputes. 

The  Certification  Body  has  defined  "dispute"  to  mean: 

For  the  purposes  of  validation,  a  dispute  is  constituted  by  any 
behavior  of  the  candidate  Ada  implementation  that  is  not 
explicitly  permitted  by  the  code  of  the  ACVC  tests,  by  the 
documentation  from  the  AMO  that  accompanies  the  ACVC  tapes,  or  by 
other  documentation  provided  to  the  vendor  by  the  Ada  Validation 
Facility  (AVF). 

Disputes  must  be  brought  to  the  attention  of  the  AVF  as  soon  as  possible  so 
that  they  can  be  resolved  by  the  AVF  and  AVO.  A  dispute  related  to  a 
validation  attempt  should  be  sent  to  the  AVF  handling  the  validation. 
Other  disputes  of  ACVC  tests  can  be  sent  to  the  AMO. 


3. 2. 4. 5  Guidelines  Pop.  Modifying  Tests. 

It  is  expected  that  some  tests  will  require  modifications  of  code, 
processing,  or  evaluation  in  order  to  compensate  for  legitimate 
implementation  behavior.  Modifications  are  made  with  the  approval  of  the 
AVO,  and  are  made  in  cases  where  legitimate  implementation  behavior 
prevents  the  successful  completion  of  an  (otherwise)  applicable  test. 
Examples  of  such  modifications  include: 
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.  Adding  a  length  clause  to  alter  the  default  size  of  a  collection. 

.  Creating  split  tests. 

.  Confirming  that  messages  produced  by  an  executable  test 
demonstrate  conforming  behavior  that  wasn't  anticipated  by  the 
test  (such  as  raising  one  exception  instead  of  another). 

No  original  test  can  be  modified;  copies  must  be  made.  It  is 
recommended  that  the  copies  be  named  by  appending  an  alpha-numeric 
character  to  the  <name>  portion  of  the  original  test  file.  If  possible, 
the  line  numbers  of  the  original  test  should  remain  intact. 

Split  tests  can  be  created  for  class  B  and  L  tests.  Split  tests  have 
certain  lines  commented  out  to  facilitate  catching  any  previously 
undetected  errors.  Split  tests  can  also  be  used  to  ensure  that  all  legal 
constructs  are  passed. 


3.3  Validation  Support  Tools. 

The  following  validation  tools  are  used  to  a)  provide  additional 
information  about  an  implementation,  and  b)  reduce  the  effort  required  to 
perform  a  validation  attempt. 


3.3.1  The  Ada  Validation  Assistant  Tool. 

3. 3. 1.1  Description. 

The  Ada  Validation  Assistant  Tool  (AVAT)  is  a  set  of  five  programs 
that  test  implementation-dependent  features  and  produce  lists  of  possibly 
inapplicable  tests.  Although  it  is  not  part  of  the  test  suite,  the  AVAT 
system  can  assist  in  the  validation  process  by  providing  information  about 
the  implementation. 

AVAT  attempts  to  determine  whether  certain  features  of  the  language 
are  supported  by  the  implementation.  These  features  include  predefined 
types  other  than  those  required  by  the  language  and  certain  forms  of 
representation  clauses.  AVAT  also  attempts  to  measure  the  degree  to  which 
some  features  are  supported,  including  fixed-  and  floating-point  precision, 
and  compilation  of  generic  specifications  and  bodies  in  separate  files. 
Finally,  AVAT  reports  the  values  of  many  implementation-dependent  values, 
Including  Integer  type  bounds,  real  type  accuracies  and  ranges,  and  the 
constants  declared  in  the  package  SYSTEM. 

For  the  features  of  the  language  that  are  not  (fully)  supported,  the 
AVAT  programs  report  lists  of  ACVC  tests  that  might  be  inapplicable  due  to 
the  lack  of  (full)  support.  These  lists  may  not  be  complete;  that  is, 
there  may  be  unlisted  tests  which  are  inapplicable  due  to  an 
implementation's  lack  of  support  for  a  particular  feature.  Likewise,  the 
lists  may  not  be  entirely  accurate  for  a  particular  implementation;  that 
is,  due  to  implementation  decisions  not  anticipated  by  AVAT's  designers,  a 
test  may  be  listed  when  it  is  actually  applicable  to  the  implementation. 
The  final  determination  of  the  applicability  of  a  test  depends  on  the 
specific  criteria  given  in  the  text  of  the  test,  the  agreement  of  test 
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results  with  the  vendor's  documentation,  and,  in  some  cases,  the  vendor's 
explanation  of  unusual  test  results.  It  is  the  vendor's  responsibility  to 
reconcile  any  inconsistencies;  for  validation  purposes,  justification  of 
inconsistencies  must  be  provided  to  the  AVF  in  the  form  of  a  test  dispute. 

Each  AVAT  program  consists  of  a  data  collection  and  reporting  package 
(common  to  the  five  AVAT  programs),  a  number  of  auxiliary  library 
procedures,  and  a  main  procedure  which  imports  the  package  and  invokes  the 
auxiliary  procedures.  Some  of  the  auxiliary  procedures  simply  provide 
section  headers  for  the  report,  and  others  provide  the  values  of 
system-defined  constants.  The  remaining  procedures  (the  majority)  are  used 
to  determine  whether  specific  language  features  are  supported.  There  are 
two  or  more  versions  of  each  such  procedure.  For  example,  the  procedure 
which  tests  for  support  of  'SIZE  clauses  for  integer  types  occurs  in  four 
versions.  The  first  version  contains  no  'SIZE  clauses;  if  it  is  executed, 
it  stores  (in  a  structure  declared  in  the  package)  a  message  that  'SIZE 
clauses  are  not  supported  for  integer  types,  auid  a  list  of  ACVC  tests  that 
are  therefore  potentially  inapplicable.  The  second  version  contains  a 
'SIZE  clause  specifying  the  implementation's  default  size;  if  it  executes, 
it  stores  a  message  that  only  default  size  specifications  are  accepted,  and 
a  corresponding  list  of  potentially  inapplicable  ACVC  tests.  Likewise,  the 
third  and  fourth  versions  contain  intermediate  and  minimal  size 
specifications  and  store  corresponding  messages  and  lists  of  tests.  The 
four  versions  of  the  procedure  must  be  submitted  to  the  compiler  in  the 
given  order.  The  last  one  to  successfully  compile  will  be  the  version 
invoked  when  the  main  prograun  executes;  thus  the  appropriate  message  and 
test  list  will  be  reported. 

The  AVAT  programs  are  organized  as  follows; 

COMMON  PACKAGE  DATACOLLECTION 

This  package  collects  and  reports  the  messages  and  lists  of 
potentially  inapplicable  tests. 

Specification  DATSPEC.ADA 

Body  DATBODY.ADA 

PART  ONE  AVATNUM 

This  program  reports  on  numeric  type  declarations  and 
characteristics. 

Main  procedure  AVATNUM. ADA 

Auxiliary  pracedures  AVATOOO.ADA  ..  AVAT006.ADA 

AVAT007.TST 

AVAT008.ADA  ..  AVAT012.ADA 

AVAT013.TST 

AVAT014.ADA 

AVAT015.TST 

AVAT016.ADA  ..  AVAT026.ADA 


-r. 
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PART  TWO  AVATLEN 

This  program  reports  on  the  support  for  length  clauses. 

Main  procedure  AVATLEN. ADA 

Auxiliary  procedures  AVATIOO.ADA  ..  AVAT134.ADA 

AVAT135.TST 

AVAT136.ADA 

AVAT137.TST 

AVAT138.ADA  ..  AVAT154.ADA 
PART  THREE  AVATREP 

This  program  reports  on  the  support  for  enumeration  and  record 
representation  clauses  and  address  clauses.  Some  of  the 

auxiliary  procedures  in  this  program  depend  on  the  support 

package  SPPRT13. 

Main  procedure  AVATREP. ADA 

Auxiliary  procedures  AVAT200.A0A  ..  AVAT227.ADA 

PART  FOUR  AVATGEN 

This  program  reports  on  the  support  for  separate  compilation  of 
generic  specifications,  bodies,  and  subunits,  and  for  file  I/O. 

Main  procedure  AVATGEN. ADA 

Auxiliary  procedures  AVAT300.ADA  ..  AVAT335.ADA 

PART  FIVE  AVATSTD 

This  program  reports  the  values  of  constants  and  type 
characteristics  in  the  packages  STANDARD  and  SYSTEM. 

Main  procedure  AVATSTD. ADA 

Auxiliary  procedures  AVAT400.ADA  ..  AVAT411.ADA 


3. 3. 1.2  Compilation. 

The  five  programs  that  make  up  AVAT  may  be  processed  in  any  order; 
however,  the  order  of  compilation  within  each  program  is  crucial.  The 
specification  of  package  DATACOLLECTION  must  be  compiled  as  the  first  unit 
in  each  program;  the  body,  of  course,  may  be  compiled  at  any  subsequent 
time  before  the  link  step.  The  auxiliary  procedures  must  be  compiled  after 
the  package  and  before  the  main  procedure,  since  they  import  the  package 
and  the  main  procedure  imports  the  auxiliary  procedures.  It  is  especially 
important  to  note  that  the  auxiliary  procedures  must  be  compiled  in  the 
order  given  by  their  file  names,  since  the  success  of  the  programs  depends 
on  the  required  library  management.  Note  that  this  compilation  order 
requirement  prohibits  the  use  of  any  sort  of  concurrent  or  interleaved 
compilation,  including  the  use  of  batch  queues  with  more  than  one  job 
running  at  the  same  time. 
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3. 3. 1.3  Interpretation  Of  Results. 

When  the  five  AVAT  programs  execute,  they  report  the  values  of 
implementation-dependent  constants,  report  that  certain  features  are  (are 
not)  supported,  and  produce  lists  of  tests  which  are  potentially 
inapplicable  due  to  the  apparent  lack  of  support  of  certain  features.  The 
reports  should  be  read  and  carefully  considered  in  light  of  the  system 
documentation  and  known  implementation  decisions.  The  lists  of  potentially 
inapplicable  tests  serve  as  a  guide  in  determining  applicability,  but  final 
decisions  are  made  on  the  basis  of  test  behavior,  test-specific 
applicability  criteria,  and  consistency  with  documentation. 


3.3.2  Library  Support  Units. 

The  following  library  support  units  must  be  compiled  and  loaded  into 
the  program  library  that  is  used  when  compiling  and  linking  the  ACVC  tests. 


3. 3. 2.1  Reporting  Test  Results. 

3.3.2. 1.1  Package  Report. 

All  executable  tests  use  the  REPORT  support  package.  This  package 
contains  routines  to  1)  automate  reporting  of  test  results  and  2)  help 
prevent  optimizing  out  any  test  code.  Automation  of  reporting  test  results 
is  accomplished  with  a  set  of  procedures  which  Identify  the  test  and 
indicate  its  result.  Optimization  is  defeated  with  a  set  of  identity 
functions. 

Package  REPORT  uses  most  of  the  Ada  features  used  throughout  the  test 
suite,  namely: 

type  INTEGER,  literals,  +,  -,  relations,  :» 

type  CHARACTER,  literals,  &,  relations,  :=• 

type  STRING,  literals,  A,  relations, 

type  BOOLEAN,  literals,  AND,  OR,  NOT,  relations, 

user-defined  enumeration  type,  literals,  relations, 

object  declarations  (and  initialization)  for  the  above  types. 

subprogram  declarations,  bodies,  and  calls,  with  formal 
parameters  of  all^modes  and  of  the  above  types. 

IF  statements. 


Executable  tests  generally  follow  the  format: 

WITH  REPORT;  USE  REPORT; 

PROCEDURE  Testname  IS 

BEGIN 
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TEST  ("Testname",  "Description 
•  «  » 

IF  ...  /■  CorrectValue  THEN 
FAILED  ("Reason"); 

END  IF; 

RESULT; 

END  Testname; 

The  specification  of  package  REPORT  is  given  in  the  file  REPSPEC.ADA. 
The  body  of  package  REPORT  is  given  in  the  file  REPBODY.ADA.  The 
specification  and  body  of  package  REPORT  are  also  given  in  Appendix  C. 

The  acceptance  tests  CZIIOIA.ADA  and  CZ1102A.ADA  must  be  compiled  and 
executed  before  a  validation  attempt  to  ensure  correct  operation  of  REPORT. 
A  listing  of  the  output  for  CZIIOIA.ADA  is  given  in  Appendix  E. 


3. 3. 2. 1.2  Allowable  Modifications  To  Package  Report. 

Since  the  body  of  package  REPORT  is  independent  of  the  tests 
themselves,  it  can  be  modified  to  use  only  those  implementation  features 
that  are  actually  working.  Modifications  made  for  a  validation  attempt 
must  be  presented  to  the  AVP. 


3. 3. 2. 2  File  I/O. 

3. 3. 2. 2.1  Procedure  CheckFile. 

Some  of  the  executable  flle-I/0  tests  (CE...  tests)  use  a  checking 
procedure  called  CHECKFILE.  CHECKFILE  is  used  to  determine  the 
implementation's  text  file  characteristics. 

The  source  code  for  this  procedure  is  found  in  the  file  CHECKFILE. ADA. 
The  body  of  procedure  CHECKFILE  is  also  given  in  Appendix  D. 

The  acceptance  test  CZ1103A.ADA  must  be  compiled  and  executed  before  a 
validation  attempt  to  ensure  correct  operation  of  CHECKFILE.  CZ1103A 
checks  that  errors  in  text  files  are  properly  detected;  therefore,  CZ1103A 
will  print  some  failure  messages  when  it  is  executed.  The  presence  of 
these  messages  does  not  mean  the  test  has  failed.  A  listing  of  the  output 
for  CZ1103A.ADA  is  given  in  Appendix  E. 


3. 3. 2. 3  Address  Clauses. 

3. 3. 2. 3.1  Package  Spprtl3. 

Package  SPPRT13  contains  functions  which  return  values  of  type 
SYSTEM. ADDRESS  for  use  in  ADDRESS  clauses.  Only  the  specification  of  this 
package  is  distributed  with  the  ACVC;  the  body  must  be  supplied  by  the 
implementer.  Spprtl3  is  required  for  running  test  B91001H.ADA,  many 
chapter  13  tests  (CD...  tests),  and  AVAT. 
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3. 3. 2. 3. 2  Allowable  Modifications  To  Package  Spprtl3. 

If  the  type  SYSTEM. ADDRESS  is  defined  to  be  static,  then  the  functions 
in  package  SPPRT13  can  be  replaced  with  constants.  Modifications  made  for 
a  validation  attempt  must  be  presented  to  the  AVP. 
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APPENDIX  A 


Macros  and  Their  Descriptions 

Following  is  the  information  contained  in  the  MACRO. DFS  file.  Each 
macro  definition  includes: 

1.  The  macro  itself. 

2.  A  description  of  what  the  replacement  value  represents. 

3.  A  list  of  tests  which  depend  on  the  macro. 

4.  An  example  replacement  value. 


—  $MAX_IN_LEN 

—AN  INTEGER  LITERAL  GIVING  THE  MAXIMUM  LENGTH  PERMITTED  BY  THE 

—  COMPILER  FOR  A  LINE  OF  ADA  SOURCE  CODE  (NOT  INCLUDING  AN  END-OF-LINE 

—  CHARACTER). 

—  USED  IN:  A26007A 

MAX  IN  LEN  60 


—  $BIG_ID1 

—  AN  IDENTIFIER  IN  VHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN  LEN. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003D  B23003B  C23503G 

C23003H  C23003I  C23003J  C35502D  C35502F 

BIG  IDl 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAAl 


—  $BIG_ID2 

—  AN  IDENTIFIER  IN  VHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN_LEN, 

—  DIFFERING  FROM  $BIG_ID1  ONLY  IN  THE  LAST  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003F  C23003G  C23003H 

C23003I  C23003J 

BIG  ID2 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA2 
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—  $BIG  ID3 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN  LEN. 

—  USED  IN:  C23003A  C23003B  C23003C  C23003G  C23003H  C23503I 

C23003J 

BIG_ID3 

AAAAAAAAA_AAAAAAAAA_AAAAAAAAA3AAAAAAAAA  AAAAAAAAA_AAAAAAAAAA 

—  $BIG_ID4 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN  LEN, 

—  DIFFERING  FROM  $BIG_ID3  ONLY  IN  THE  MIDDLE  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  C23003G  C23003H  C23003I 

C23003J 

BIG_ID4 

AAAAAAAAA  AAAAAAAAA  AAAAAAAAA4AAAAAAAAA  AAAAAAAAA  AAAAAAAAAA 


—  $BIG_STRING1 

~  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG_STRING2 

—  ($BIG_STRING1  &  $BIG  STRING2)  PRODUCES  THE  IMAGE  OP  $BIG_ID1. 

—  USED  IN:  C35502D  C35502F 

BIGSTRINGl  "AAAAAAAAA_AAAAAAAAA_AAAAAAAAA_" 

—  $BIG_STRING2 

—  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG_STRING1 

—  ($BIG_STRING1  &  $BIG  STRING2)  PRODUCES  THE  IMAGE  OP  $BIG_ID1. 

—  USED  IN:  C35502D  C35502F 

BIG  STRING2  "AAAAAAAAA  AAAAAAAAA  AAAAAAAAAl" 


—  $MAX  STRING  LITERAL 

—  A  STRING  LITERAL  CONSISTING  OF  $MAX  IN  LEN  CHARACTERS  (INCLUDING  THE 

—  QUOTE  CHARACTERS). 

—  USED  IN:  A26007A 
MAX  STRING_LITERAL 

’^CCCCCCC10CCCCCCCC20CCCCCCCC30CCCCCCCC40CCCCCCCC50CCCCCCCC59" 


—  $NEG_BASED_INT 

—  A  BASED_INTEGER  LITERAL  (PREFERABLY  BASE  8  OR  16)  WHOSE  HIGHEST  ORDER 

—  NON-ZERO  BIT  WOULD  FALL  IN  THE  SIGN  BIT  POSITION  OF  THE 

—  REPRESENTATION  FOR  SYSTEM . MAX_INT ,  I.E.,  AN  ATTEMPT  TO  WRITE  A 

—  NEGATIVE  VALUED  LITERAL  SUCH  AS  -2  BY  TAKING  ADVANTAGE  OP  THE 

—  BIT  REPRESENTATION. 

—  USED  IN:  E24201A 

NEG  BASED  INT  16#FFFPFFFE# 


$BIG_INT_LIT 

—  AN  INTEGER  LITERAL/WHOSE  VALUE  IS  298,  BUT  WHICH  HAS 

—  ($MAX_IN_LEN  -  3)  LEADING  ZEROES. 

—  USED  IN:  C24003A 
BIG_INT_LIT 

000000000000000000000000000000000000000000000000000000000298 
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$BIG  REAL  LIT 

—  A  UNIVERSAL  REAL  LITERAL  WHOSE  VALUE  IS  690.0,  BUT  WHICH  HAS 

—  ($KAX  IN  LER  -  5)  LEADING  ZEROES. 

—  USED  TN:  C24003B  C24003C 

BIG_REAL  LIT 

“0000000000000000000000000000000000000000000000000000000690 . 0 

—  $MAX_LEN_INT_BASED_LITEBAL 

—  A  BASED  INTEGER  LITERAL  (USING  COLONS)  WHOSE  VALUE  IS  2:11:,  HAVING 

—  ($MAX_IN_LEN  -  5)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  FIRST  1. 

—  USED  IN:  C2A009A 

MAX  LEN  INT  BASED  LITERAL 

"2 : OOOOOCOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOl 1 : 

—  $MAX_LEN_REAL_BASED  LITERAL 

—  A  BASED  REAL  LITERAL  (USING  COLONS)  WHOSE  VALUE  IS  16:F.E:,  HAVING 

—  ($MAX_IN_LEN  -  7)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  F. 

—  USED  IN:  C2A009A 

MAX  LEN  REAL  BASED  LITERAL 

T6 : O(5OOOO0OOOOO5OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOF . E : 

—  $BLANKS 

—  A  SEQUENCE  OF  ($MAX  IN  LEN  -  20)  BLANKS. 


—  USED  IN:  B22001A 

B22501B 

B22001C 

B22001D 

B22001B 

B22001P 

B22001G 

B22001N 

B22001I 

B22001J 

B22001K 

B22001L 

B22001M 

<  LIMITS  OP  SAMPLE  SHOWN 

BLANKS 

BY  ANGLE 

BRACKETS 

> 

—  $MAX_DIGITS 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX  DIGITS. 

—  USED  IN:  B35701A  CD7102B 

MAX_DIGITS  6 

—  SNAME 

—  THE  NAME  OF  A  PREDEFINED  INTEGER  TYPE  OTHER  THAN  INTEGER, 

—  SHORT_INTEGER,  OR  LONG_INTEGER . 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USE  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCH  TYPE  AVAILABLE.) 

—  USED  IN:  AVAT007  C45231D  B8600TX 
NAME  TINY_INTEGER 

—  $ FLOAT  NAME 

—  THE  NAME  OP  A  PREDEFINED  FLOATING  POINT  TYPE  OTHER  THAN  FLOAT, 

—  SHORTFLOAT,  OR  LOlfO  FLOAT.  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH 

—  TYPES  SHOULD  USE  AN  tiNDEFINED  IDENTIFIER  SUCH  AS  NOSUCHTYPE . ) 

—  USED  IN:  AVAT013  B86001Y 

FLOAT  NAME  SHORT  SHORT  FLOAT 
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—  $FIXED_NAME 

—  THE  NAME  OF  A  PREDEFINED  FIXED  POINT  TYPE  OTHER  THAN  DURATION. 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USE  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCH_TYPE.) 

—  USED  IN:  AVAT030  BBSOOIZ 

FIXEDNAME  NO_SUCH_FIXED_TYPE 

—  $INTEGER_FIRST 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  INTEGER' FIRST. 

—  USED  IN:  C35503F  B54B01B 

INTEGER_FIRST  -32_768 

—  SINTEGER  LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST. 

—  USED  IN:  C35503F  B45232A  B45B01B 

INTEGER_LAST  32_767 

—  $INTEGER_LAST_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST  +  1. 

—  USED  IN:  C45232A 
INTEGER_LAST_PLUS_1  32_768 

—  $MIN_INT 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  SYSTEM . MIN_INT . 

—  THE  LITERAL  MUST  NOT  CONTAIN  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  CD7101B 

MIN_INT  -2147483648 

—  $MAX  INT 

—AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM . MAX_INT . 

—  THE  LITERAL  MUST  NOT  INCLUDE  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  C4A007A  CD7101B 

MAX_INT  2147483647 

—  $MAX  INT_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM . MAX_INT  +  1. 

—  USED  IN:  C45232A 

MAX_INT_PLUS_1  2_147_483_648 

—  $LESS_THAN_DURATION 

—  A  REAL  LITERAL  (WITH  SIGN)  WHOSE  VALUE  (NOT  SUBJECT  TO 

—  ROUND-OFF  ERROR  IF  POSSIBLE)  LIES  BETWEEN  DURATION' BASE' FIRST  AND 

—  DURATION' FIRST.  IP  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN 

—  DURATION 'RANGE. 

—  USED  IN;  C96005B 

LESS  THAN  DURATION  -75  000.0 
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—  $GREATER_THAN_DURATION 

—  A  REAL  LITERAL  WHOSE  VALUE  (NOT  SUBJECT  TO  ROUND-OFF  ERROR 

—  IF  POSSIBLE)  LIES  BETWEEN  DURATION 'BASE' LAST  AND  DURATION' LAST.  IF 

—  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN  DURATION 'RANGE. 

—  USED  IN;  C96005B 

GREATER_THAN_DURATION  7  5_000 . 0 

—  $LESS_THAN_DURATION_BASE  FIRST 

—  A  REAL  LITERAL  (WITH  SIGR)  WHOSE  VALUE  IS  LESS  THAN 

—  DURATION' BASE' FIRST. 

—  USED  IN:  C96005C 

LESS_THAN_DURATION_BASE_FIRST  -131073.0 

—  $GREATER_THAN_DURATION_BASE_LAST 

—  A  REAL  LITERAL  WHOSE  VALUE  IS  GREATER  THAN  DURATION 'BASE' LAST. 

—  USED  IN:  C96005C 

GREATER_THAN_DURATION_BASB_LAST  131_07  3 . 0 

—  $COUNT_LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  TEXT  10. COUNT' LAST. 

—  USED  IN;  CE3002B 

COUNT_LAST  32_767 

—  $FIELD  LAST 

—  AN  integer  literal  WHOSE  VALUE  IS  TEXT  10. FIELD' LAST. 

—  USED  IN;  CE3002C 

FIELD_LAST  32_767 

—  $ILLEGAL  EXTERNAL  FILE  NAMBl 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME  (E.G.,  TOO  LONG,  CONTAINING  INVALID 

—  CHARACTERS,  CONTAINING  WILD-CARD  CHARACTERS,  OR  SPECIFYING  A 

—  NONEXISTENT  DIRECTORY). 

—  USED  IN;  CE2103A  CE2102C  CE2102B  CB2103B  CE3102B  CE3107A 

ILLEGAL_EXTERNAL_FILE_NAME1  \NODIRECTORY\FILENAME 

—  $ ILLEGAL  EXTERNAL_FILE_NAME2 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME,  DIFFERENT  FROM  $EXTERNAL_FILE_NAME1 . 

—  USED  IN;  CE2102C  CE2102H  CE2103A  CE2103B 

ILLEGAL_EXTERNAL_FILE_NAME2  THIS-FILE-NAME-IS-TOO-LONG-FOR-MY-SYSTEM 

—  SACCSIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  MINIMUM  NUMBER  OF  BITS 

—  SUFFICIENT  TO  HOLD  ANY  VALUE  OF  AN  ACCESS  TYPE. 

—  USED  IN;  CD1C03C  CD2A81A  CD2A81B  CD2A81C  CD2A81D  CD2A81E 

CD2A81P  CD2A81G  CD2A83A  CD2A83B  CD2A83C  CD2A83E 

CD2A83F  CD2A83G  ED2A86A  CD2A87A 

ACC  SIZE  32 
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—  $TASK  SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  A  SINGLE  ENTRY  WITH  ONE  INOUT  PARAMETER. 

—  USED  IN:  CD2A91A  CD2A91B  CD2A91C  CD2A91D  CD2A91E 

TASK_SIZE  128 

—  $MIN_TASK_SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  NO  ENTRIES,  NO  DECLARATIONS,  AND  "NULL;" 

—  AS  THE  ONLY  STATEMENT  IN  ITS  BODY. 

—  USED  IN:  CD2A95A 

MIN_TASK_SIZE  64 

—  $NAME_LIST 

—  A  LIST  OP  THE  ENUMERATION  LITERALS  IN  THE  TYPE  SYSTEM. NAME,  SEPARATED 

—  BY  COMMAS. 

—  USED  IN:  CD7003A 

NAME_LIST  OUR_VMS_ADA,  CUR_ULTRIX_ADA,  OUR_ELN_ADA 

—  $DEFAULT_SYS_NAME 

—  THE  VALUE  OP  THE  CONSTANT  SYSTEM . SYSTEM_NAME . 

—  USED  IN:  CD7004A  CD7004C  CD7004D 

DEFAULT_SYS_NAME  OUR_VMS_ADA 

—  $NEW_SYS  NAME 

—  A  VALUE  OF  THE  TYPE  SYSTEM. NAME,  OTHER  THAN  $DEPAULT_SYS_NAME.  IP 

—  THERE  IS  ONLY  ONE  VALUE  OP  THE  TYPE,  THEN  USB  THAT  VALUE. 

—  NOTE:  IF  THERE  ARE  MORE  THAN  TWO  VALUES  OP  THE  TYPE,  THEN  THE 

PERTINENT  TESTS  ARE  TO  BE  RUN  ONCE  FOR  EACH  ALTERNATIVE. 

—  USED  IN:  ED7004B1 

NEW_SYS_NAME  OUR_ULTRIX_ADA 

—  $DEFAULT_STOR_UNIT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM . STORAGB_UNIT . 

—  USED  IN:  CD7005B  ED7005D3M  CD7005E 

DEFAULT_STOR_UNIT  16 

—  $NEV_STOR_UNIT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  STORAGE_UNIT,  OTHER  THAN  $DEFAULT_STOR_UNIT .  IF  THERE 

—  IS  NO  OTHER  PERMITTED  VALUE,  THEN  USE  THE  VALUE  OP 

—  $SYSTEM.STORAGE_UNIT.  IP  THERE  IS  MORE  THAN  ONE  ALTERNATIVE, 

—  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR  EACH  ALTERNATIVE. 

—  USED  IN:  ED7005C1  ED7005D1  CD7005E 

NEW_STOR_UNIT  ,9  . 

—  $DEPAULT  MEM  S’^ZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MEMORY_SIZE. 

—  USED  IN:  CD7006B  ED7006D3M  CD7006E 

DEFAULT  MEM  SIZE  655  360 
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—  $NEW  HEM  SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  MEMORY  SIZE,  OTHER  THAN  SDEFAULTMEM  SIZE.  IP  THERE  IS  NO 

—  OTHER  VALUE,  THEN  USE  $DEFAULT  MEM_SIZE.  IF  THERE  IS  MORE  THAN 

—  ONE  ALTERNATIVE,  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR 

—  EACH  ALTERNATIVE.  IP  THE  NUMBER  OP  PERMITTED  VALUES  IS  LARGE,  THEN 

—  SEVERAL  VALUES  SHOULD  BE  USED,  COVERING  A  WIDE  RANGE  OF 
_  POSSIBILITIES* 

—  USED  IN:  ED7006C1  ED7006D1  CD7006E 

NEW_MEM_SIZE  1_048_576 

—  $LOW  PRIORITY 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  LOWER  BOUND  OF  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

LOW  PRIORITY  0 
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—  $HIGH  PRIORITY 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  UPPER  BOUND  OF  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

HIGH  PRIORITY  3 


—  SMANTISSADOC 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAX_MANTISSA  AS  SPECIFIED 

—  IN  THE  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7013B 

MANTISSA  DOC  31 


—  $DELTA  DOC 

—  A  REAL'LITERAL  whose  value  IS  SYSTEM. FINE_DELTA  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7013D 

DELTA  DOC  0.000  000  000  465  661  287  307  739  558  602  5 


—  $TICK 

—  A  REAL  LITERAL  WHOSE  VALUE  IS  SYSTEM. TICK  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7104B 
TICK  0.001 
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APPENDIX  B 


Test  Applicability  Criteria 


Certain  tests  in  the  suite  may  be  considered  inapplicable  to  an 
implementation  depending  on  the  way  the  implementation  treats  the 
implementation-dependent  features  of  the  language.  A  brief  summary  of 
these  implementation-dependent  features  and  the  tests  they  affect  are 
listed  in  this  appendix. 

Note  that  the  applicability  of  each  one  of  these  tests  is  based  on  the 
criteria  listed  in  the  test  file.  All  potentially  inapplicable  tests  must 
still  be  compiled  -  except  those  tests  which  require  a  floating-point 
DIGITS  value  that  exceeds  SYSTEM. MAX  DIGITS  -  and  executed  if  successfully 
compiled,  to  verify  the  implementation's  treatment  of  these  features.  All 
results  for  a  particular  feature  must  be  consistent. 

The  first  part  of  this  appendix  is  concerned  with  tests  for  which  the 
applicability  is  determined  at  compile  time.  Class  B  tests  that  are 
inapplicable  should  be  successfully  compiled.  Executable  test  that  are 
inapplicable  must  be  rejected  at  compile  time  as  a  result  of  the 
unsupported  feature.  Lines  containing  the  implementation-dependent 
features  are  marked  " —  NA  ■>  ERROR.". 


If  the  type  SHORT 

INTEGER  is  not 

predefined,  then 

s 

are  inapplicable: 

i 

B52004E.DEP 

B55B09D.DEP 

B86001V.DEP 

C45231B.DEP 

C45304B.DEP 

C45502B.DBP 

C45503B.DEP 

C45504B.DEP 

C45504E.DEP 

C45611B.DEPi. 

C45613B.DEP 

C45614B.DEP 

C45631B.DEP 

C45632B.DEP 

C55B07B.DEP 

CD7101E.DEP 
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Compile  Time  Inapplicability 


If  the  type  LONG_INTEGER  is  not  predefined,  then  the  following  tests 
are  inapplicable: 


B52004D.DEP 

C45231C.DEP 

C45503C.DEP 

C45611C.DEP 

C45631C.DEP 

CD7101F.DEP 


B55B09C.DEP 

C45304C.DEP 

C45504C.DEP 

C45613C.DEP 

C45632C.DEP 


B86001U.DEP 

C45502C.DEP 

C45504F.DEP 

C45614C.DEP 

C55B07A.DEP 


If  the  type  SHORT_FLOAT  is  not  predefined,  then  the  following  tests 
are  inapplicable:  * 

B86001T.DEP  C35702A.DEP 

inappli^able^*°^^"^^°^^  predefined,  then  the  following  tests  are 

B86001U.DEP  C35702B.DEP 


If  there  are 
SHORT  INTEGER, 
inapplicable: 


no  predefined  integer  types  other  than  INTEGER, 
and  LONG_INTEGER,  then  the  following  tests  are 


B86001X.TST  C45231D.TST  CD7101G.TST 


If  there  are  no  predefined 
SH0RT_FL0AT,  and  L0NG_FL0AT, 


floating-point  types  other  than  FLOAT 
then  the  following  test  is  Inapplicable: 


f 


B86001Z.TST 


If  there  are  no  predefined  fixed-point  types, 
is  inapplicable: 


then  the  following 


test 


B86001Y.TST 


If  SIZE  representation  clauses  for  boolean  types  are  not 
then  the  following  tests  are  inapplicable; 


supported. 


CD2A64A.DEP  CD2A64C.DEP  CD2A65A.DEP 

CD2A65C.DEP  CD2A74A.DEP  CD2A76A.DEP 


B-2 


Compile  Time  Inapplicability 


If  'SIZE  representation  clauses  for  enumeration  types  are  not 
supported,  then  the  following  tests  are  Inapplicable: 

A39005B.DEP  CD1009B.DEP  CD1009P.DEP 
CD2A21A.DEP  CD2A21B.DEP  CD2A21C.DEP 
CD2A21D.DEP  CD2A21E.DEP  CD2A22A.DEP 
CD2A22B.DEP  CD2A22C.DEP  CD2A22D.DEP 
CD2A22E.DEP  CD2A22F.DEP  CD2A22G.DEP 
CD2A22H.DEP  CD2A22I.DEP  CD2A22J.DEP 
CD2A23A.DEP  CD2A23B.DEP  CD2A23C.DEP 
CD2A23D.DEP  CD2A23E.DEP  CD2A24A.DEP 
CD2A24B.DEP  CD2A24C.DEP  CD2A24D.DEP 
CD2A24E.DEP  CD2A24F.DEP  CD2A24G.DEP 
CD2A24H.DEP  CD2A24I.DEP  CD2A24J.DEP 
CD2A66B.DEP  CD2A66D.DEP  ED2A26A.DEP 


If  'SIZE  representation  clauses  for  integer  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

C87B62A.DEP  CD1009A.DEP  CD10090.DEP 
CD1C03A.DEP  CD1C04A.DEP  CD2A31A.DEP 
CD2A31B.DEP  CD2A31C.DEP  CD2A31D.DEP 
CD2A32A.DEP  CD2A32B.DEP  CD2A32C.DEP 
CD2A32D.DEP  CD2A32E.DEP  CD2A32F.DEP 
CD2A32G.DEP  CD2A32H.DEP  CD2A32I.DEP 
CD2A32J.DEP  CD2A64B.DEP  CD2A64D.DEP 
CD2A65B.DEP  CD2A65D.DEP  CD2A74B.DEP 
CD2A76B.DEP 


If  'SIZE  representation  clauses  for  floating-point  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

CD1009C.DEP  CD2A41A.DEP  CD2A41B.DEP 
CD2A41C.DEP  CD2A41D.DEP  CD2A41E.DEP 
CD2A42A.DEP  CD2A42B,DEP  CD2A42C.DEP 
CD2A42D.DEP  CD2A42E.DEP  CD2A42F.DEP 
CD2A42G.DEP  CD2A42H.DEP  CD2A42I.DEP 
CD2A42J.DEP 
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Compile  Time  Inapplicability 


If  'SIZE  representation  clauses  for  fixed-point  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 


CD1009D.DEP 

CD2A51B.DEP 

CD2A51E.DEP 

CD2A52C.DEP 

CD2A52H.DEP 

CD2A53A.DEP 

CD2A53D.DEP 

CD2A54B.DEP 

CD2A54G.DEP 

CD2A54J.DEP 


CD1009Q.DEP 

CD2A51C.DBP 

CD2A52A.DEP 

CD2A52D.DEP 

CD2A52I.DEP 

CD2A53B.DEP 

CD2A53E.DEP 

CD2A54C.DEP 

CD2AS4H.DEP 

E02AS6A.DEP 


CD1C04C.DEP 

CD2A51D.DEP 

CD2A52B.DEP 

CD2A52G.DEP 

CD2A52J.DEP 

CD2A53C.DEP 

CD2A54A.DEP 

CD2A54D.DEP 

CD2A54I.DEP 


If  'SIZE  representation  clauses  for  array  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 


CD1009E.DEP 

CD2A61B.DEP 

CD2A61E.DEP 

CD2A61H.DEP 

CD2A61K.DEP 

CD2A62B.OEP 

CD2A63A.DEP 

CD2A63D.DEP 

CD2A64C.DEP 

CD2A65B.DEP 

CD2A66A.DEP 

CD2A66D.DEP 


CD1009P.DEP 

CD2A61C.DEP 

CD2A61P.DEP 

CD2A61I.DEP 

CD2A61L.DEP 

C02A62C.DEP 

CD2A63B.DEP 

CD2A64A.DEP 

CD2A640.DEP 

CD2A65C.DEP 

CD2A66B.DEP 


CD2A61A.DEP 

CD2A61D.OEP 

CD2A61G.DEP 

CD2A61J.DEP 

CD2A62A.DEP 

CD2A62D.DEP 

CD2A63C.DEP 

CD2A64B.DEP 

CD2A65A.DEP 

CD2A65D.DEP 

CD2A66C.DEP 


If  'SIZE  representation  clauses  for  record  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 


CD1009G.DEP 

CD2A71C.DEP 

CD2A72B.DEP 

CD2A73A.DEP 

CD2A73D.DEP 

CD2A74C.DEP 

CD2A75B.DEP 

CD2A76A.DEP 

CD2A76D.DEP 


CD2A71A.DBP 

CD2A71D.DEP 

CD2A72C.DEP 

CD2A73B.DEP 

CD2A74A.DEP 

CD2A74D.DEP 

CD2A75C.DEP 

CD2A76B.DEP 


CD2A71B.DEP 

CD2A72A.DEP 

CD2A72D.DEP 

CD2A73C.DEP 

CD2A74B.DEP 

CD2A75A.DEP 

CD2A75D.DEP 

CD2A76C.DEP 


If  'SIZE  representation  clauses  for  private  types  are  not  supported, 
then  the  following  test  is  inapplicable: 


CD1009H.DEP 
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Compile  Time  Inapplicability 


If  'SIZE  representation  clauses  for  limited  private  types  are  not 
supported,  then  the  following  test  is  inapplicable: 

CD1009I.DEP 


If  'SIZE  representation  clauses  for  access  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 


CD2A81A.TST 
CD2A81D.TST 
CD2A81G.TST 
CD2A83C.TST 
CD2A83G.TST 
CD2A84C.DEP 
CD2A84F.DEP 
CD2A84I . DEP 
CD2A84M.DEP 
ED2A86A.TST 


CD2A81B.TST 

CD2A81E.TST 

CD2A83A.TST 

CD2A83E.TST 

CD2A84A.DEP 

CD2A84D.DEP 

CD2A84G.DEP 

CD2A84K.DEP 

CD2A84N.0EP 


CD2A81C.TST 

CD2A81P.TST 

CD2A83B.TST 

CD2A83F.TST 

C02A84B.DEP 

CD2A84E.DEP 

CD2A84H.DEP 

CD2A84L.DEP 

CD2A87A.TST 


If  'SIZE  representation  clauses  for  task  types  are  not  supported,  then 
the  following  tests  are  inapplicable: 

CD2A91A.TST  CD2A91B.TST  CD2A91C.TST 

CD2A91D.TST  CD2A91E.TST 


If  ' STORAGE_SIZE  representation  clauses  for  access  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 


A39005C.DEP 

CD1009R.DEP 

CD2A83A.TST 

CD2A83E.TST 

CD2A84A.0EP 

CD2A84D.DEP 

CD2A84G.0EP 

CD2A84i(.0EP 

CD2A84N.DEP 

CD2B11C.DEP 

CD2B11F.DBP 

CD2B15C.DEP 

ED2A86A.TST 


C87B62B.DEP 

CD1009S.DEP 

CD2A83B.TST 

CD2A83F.TST 

C02A84B.DEP 

CD2A84E.DEP 

CD2A84H.DEP 

C02A84L.DEP 

CD2B11A.DEP 

CD2B11D.DEP 

CD2B11G.DEP 

CD2B16A.DEP 


CD1009J.DEP 

CD1C03C.TST 

CD2A83C.TST 

CD2A83G.TST 

CD2A84C.DEP 

CD2A84F.DEP 

CD2A84I.0EP 

CD2A84M.DEP 

CD2B11B.DEP 

CD2BHE.DEP 

CD2B15B.DEP 

CD7205C.DEP 


If  'STORAGE  SIZE  representation  clauses  for  task  types  are  not 
supported,  tHen  the  following  tests  are  inapplicable: 


A390050.DEP 

CD1009T.DEP 

CD1C04B.DEP 


C87B62D.DEP 

CD1009U.DEP 

CD1C06A.DEP 


CD1009K.DEP 

CD1C03E.DEP 

CD7205D.DEP 


Compile  Time  Inapplicability 


If  the  'SHALL  clause  is  not  supported,  then  the  following  tests  are 
inapplicable: 

A39005E.DEP  C87B62C.DEP  CD1009L.DEP 
CD1C03P.DEP  CD2A53A.DEP  CD2A53B.DEP 
CD2A53C.DEP  CD2A53D.DEP  CD2A53E.DEP 
CD2A54A.DEP  CD2A54B.DEP  CD2A54C.DEP 
CD2A54D.DEP  CD2A54G.DEP  CD2A54B.DEP 
CD2A54I.DEP  CD2A54J.DEP  CD2D11A.DEP 
C02D11B.0EP  C02D13A.DEP  ED2A56A.0EP 


If  enumeration  representation  clauses  are  not  supported,  then  the 
following  tests  are  inapplicable: 

AD1009M.DEP  AD1009V.DEP  AD1009W.DEP 
AD1C04D.DEP  C35502N.DEP  C35507I.DBP 
C35507J.DEP  C35507M.DEP  C35507N.DEP 
C35508J.DEP  CD1C03G.DEP  CD2A23A.DEP 
CD2A23B.DEP  CD2A23C.DEP  CD2A23D.DBP 
CD2A23E.DEP  CD2A24A.OEP  CD2A24B.0BP 
CD2A24C.DEP  C02A240.DEP  CD2A24E.0BP 
CD2A24P.DEP  CD2A24G.DEP  CD2A24H.DEP 
CD2A24I.DEP  CD2A24J.DEP  CD3021A.DEP 
ED2A26A.DEP 


If  enumeration  representation  clauses  for  non-con tiguous  values  are 
not  supported,  then  the  following  tests  are  inapplicable: 

A39005P.DEP  C35502I.DEP  C35502J.DEP 
C35502M.DEP  C35502N.DBP  C35507J.DEP 
C35507M.DEP  C35507N,DEP  C35508I.DEP 
C35508J.DEP  C35508M.DEP  C35508N.DEP 
C55B16A.DEP 


If  enumeration  representation  clauses  for  types  other  than  character 
and  boolean  are  not  supported,  then  the  following  tests  are 
inapplicable: 

A39005P.DEP  C35502I.DEP  C35502J.DBP 
C35502M.DEP  C35502N.DEP 


If  enumeration  representation  clauses  for  character  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

C35507I.DEP  C35507J.DEP  C35507M.DEP 

C35507N.DBP  C55B16A.DEP 
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Compile  Time  Inapplicability 


If  enumeration  representation  clauses  for  boolean  types,  with 
representation  values  other  than  (FALSE  ->  0,  TRUE  »>1),  are  not 
supported,  then  the  following  tests  are  inapplicable: 


C35508I.DEP 

C35508N.DEP 


C35508J.DEP 


C35508M.DEP 


If  record  representation  clauses  are  not  supported,  then  the  following 
tests  are  inapplicable: 


A39005G.DEP 

CD1009Y.DEP 

CDICOAE.DEP 

CD4051B.DEP 

ED1D04A.0EP 


CD1009N.DEP 

CD1009Z.DEP 

CD4031A.DEP 

CD4051C.DEP 


CD1009X.DEP 

CD1C03H.DEP 

CD4051A.DEP 

CD7204C.DEP 


If  'ADDRESS  clauses  for  variables  are  not  supported,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  Inapplicable: 


CD5003B.DEP 

CD5003E.DEP 

CD5003H.DEP 

CD5011C.DEP 

CD5011I.DEP 

CD50110.DEP 

CD5012B.DEP 

CD5012I.DEP 

CD5013A.DEP 

CD5013G.DEP 

CD5013M.DEP 

CD5014A.DEP 

CD5014G.DEP 

CD5014M.DEP 

CD5014T.DEP 

CD5014Y.DEP 


CD5003C.DEP 

CD5003P.DEP 

CD5003I.DEP 

CD5011E.DEP 

CD5011K.DEP 

CD5011Q.DEP 

CD5012E.DEP 

CD5012J.DEP 

CD5013C.DEP 

CD5013I.DEP 

CD50130.DEP 

CD5014C.DEP 

CD5014I.DEP 

CD50140.DEP 

CD5014V.DEP 

CD5014Z.DEP 


CD5003D.DEP 

CD5003G.DEP 

CD5011A.DEP 

CD5011G.DEP 

CD5011M.DEP 

CD5012A.DEP 

CD5012P.DEP 

CD5012M.DEP 

CD5013E.DEP 

CD5013K.DEP 

CD5013S.DEP 

CD5014E.DEP 

CD5014K.DEP 

CD5014S.DEP 

CD5014X.DEP 


Compile  Time  Inapplicability 


If  'ADDRESS  clauses  for  constants  are  not  supported,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5011B.DEP  CD5011D.DEP  CD5011F.DEP 
CD5011H.DEP  CD5011L.DEP  CD5011N.DEP 
CD5011R.DEP  CD5011S.DEP  CD5012C.DEP 
CD5012D.DEP  CD5012G.DEP  CD5012H.DEP 
CD5012L.DEP  CD5013B.DEP  CD5013D.DEP 
CD5013F.DEP  CD5013H.DEP  CD5013J.DEP 
CD5013L.DEP  CD5013N.DEP  CD5013R.DEP 
CD5014B.DEP  CD5014D.DEP  CD5014F.DEP 
CD5014H.DEP  CD5014J.DEP  CD5014L.DEP 
CD5014N.DEP  CD5014R.DEP  CD5014U.DEP 
CD5014W.DEP 


If  'ADDRESS  clauses  for  subprograms  are  not  supported  ,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5007B.DEP 


If  the  pragmas  SYSTEMNAME,  STORAGEUNIT,  and  MEMORYSIZE  must  come  at 
the  beginning  of  a  program  library,  then  the  following  files  are 
ommitted  from  the  associated  test: 

ED7004B0.TST  ED7004B2.TST 
ED7005C0.TST  ED7005C2.TST 
ED7005D0.TST  ED7005D2.TST 
ED7006C0.TST  ED7006C2.TST 
ED7006D0.TST  ED7006D2.TST 


If  any  limitations,  other  than  those  specified  in  the  RM,  are  imposed 
on  the  use  of  the  pragmas  SYSTEMNAME,  STORAGEUNIT,  and  MEMORYSIZE, 
then  the  following  test  may  be  inapplicable: 

CD7004C.TST  CD7005E.TST  CD7006E.TST 


Consider  the  following  declarations: 

TYPE  F  IS  DIGITS  SYSTEM. MAXDIGITS; 

N  ;  CONSTANT  2.0  *  F'MACHINERADIX  **  F'MACHINEEMAX; 

If  the  declaration  of  N  is  rejected  on  the  grounds  that  evaluation  of 
the  expression  will  raise  an  exception,  then  the  following  test  is 
inapplicable: 

C4A013B.ADA 
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Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**10  ..  2. 0**10  -  0.5 
DELTA  1.0  RANGE  -2. 0**11  ..  2. 0**11  -  1.0 
DELTA  2. 0**10  RANGE  -2. 0**21  ..  2. 0**21  -  2. 0**10 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531C.DEP  C45531D.DEP  C45532C.DEP 

C45532D.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**14  ..  2. 0**14  -  0.5 
DELTA  1.0  RANGE  -2. 0**15  ..  2. 0**15  -  1.0 
DELTA  2. 0**14  RANGE  -2. 0**29  ..  2. 0**29  -  2. 0**14 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531G.DEP  C45531H.DEP  C45532G.DEP 

C45532e.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**30  ..  2. 0**30  -  0.5 
DELTA  1.0  RANGE  -2. 0**31  ..  2. 0**31  -  1.0 
DELTA  2. 0**30  RANGE  -2. 0**61  ..  2. 0**61  -  2. 0**30 


are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531K.DEP  C45531L.DEP  C45532K.DEP 

C45532L.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**46  ..  2. 0**46  -  0.5 
DELTA  1.0  RANGE  -2. 0**47  ..  2. 0**47  -  1.0 
DELTA  2. 0**46  RANGE  -2. 0**93  ..  2. 0**93  -  2. 0**46 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C455310.DEi^"  ' '  C45531P.DEP  C455320.DEP 

C45532P.DEP 


Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  2.0**-12  RANGE  -0.5  ..  0.5  -  2.0**-12 

DELTA  2.0**-ll  RANGE  -1.0  ..  1.0  -  2.0**-ll 

DELTA  2.0**-10  RANGE  -2.0  ..  2.0  -  2.0**-10 

are  not  supported,  then  the  following  tests  are  inapplicable 

C45531A.DEP  C45531B.DEP  C45532A.DEP 

C45532B.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-16  RANGE  -0.5  ..  0.5  -  2.0**-16 

DELTA  2.0**-15  RANGE  -1.0  ..  1.0  -  2.0**-15 

DELTA  2.0**-14  RANGE  -2.0  ..  2.0  -  2.0**-14 

are  not  supported,  then  the  following  tests  are  inapplicable 

C45531E.DEP  C45531P.DEP  C45532E.DEP 

C45532P.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-32  RANGE  -0.5  ..  0.5  -  2.0**-32 

DELTA  2.0**-31  RANGE  -1.0  ..  1.0  -  2.0**-31 

DELTA  2.0**-30  RANGE  -2.0  ..  2.0  -  2.0**-30 

are  not  supported,  then  the  following  tests  are  inapplicable 

C45531I.DEP  C45531J.DEP  C45532I.DEP 

C45532J.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-48  RANGE  -0.5  ..  0.5  -  2.0**-48 

DELTA  2.0**-47  RANGE  -1.0  ..  1.0  -  2.0**-47 

DELTA  2.0**-46  RANGE  -2.0  ..  2.0  -  2.0**-46 

are  not  supported,  then  the  following  tests  are  inapplicable 

C45531M.DEP-i>., C45531N.DEP  C45532M.DEP 

C45532N.DEP 
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Compile  Time  Inapplicability 


The  following  tests  depend  on  the  value  of  SYSTEM. MAX_DIGITS; 


C24113*.DEP 

C35707*.DEP 

C45241*.DEP 

C45521*.DEP 

C45641*.DEP 


C35705*.DEP 

C35708*.DEP 

C45321*.DEP 

C45524*.DEP 

C46012*.DEP 


C35706*.DEP 

C35802*.DEP 

C45421*.DEP 

C45621*.DEP 


Use  the  table  below  to  determine  which  of  these  tests  are  applicable 
based  on  the  value  of  SYSTEM. MAX  DIGITS. 


Last  Letter  of 
Value  of  Test  Name  of 

MAX_DIGITS  Applicable  Tests 


5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 


A 

A,B 

A.  .C 

A.  .D 

A.  .E 

A.  .F 

A..G 

A..H 

A.. I 

A..J 

A..K 

A..L 

A..M 

A..N 

A.  .0 

A.  .P 

A.  .0 

A..R 

A..S 

A..T 

A..U 

A..V 

A..W 

A..X 

A..Y 

A.  .Z 


If  the  value  of  SYSTEM. MA]rI_DIGITS  >  35,  then  the  following  test  is 
inapplicable: 

C4A011A.ADA 


Compile  Time  Inapplicability 


If  a  generic  library-subprogram  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  test  is  inapplicable: 

CA1012A*.DEP 


If  a  generic  library-package  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  tests  are 
inapplicable: 

BC3204C*.DEP  BC3204D*.DEP 


If  a  generic,  non-library  package  body  cannot  be  compiled  as  a  subunit 
in  a  separate  file  than  its  specification,  then  the  following  test  is 
inapplicable: 

CA2009C*.DEP 


If  a  generic,  non-library  subprogram  body  cannot  be  compiled  as  a 
subunit  in  a  separate  file  than  its  specification,  then  the  following 
test  is  inapplicable: 

CA2009P*.DEP 


If  a  generic  procedure  cannot  have  subunits  which  are  compiled  in 
separate  files  than  the  generic  unit,  then  the  following  test  is 
inapplicable: 

CA3011A*.DEP 


If  package  SYSTEM  is  used  by  package  TEXT_IO,  then  the  following  test 
is  inapplicable: 

C86001P.DEP 


If  SEQUENTIAL_IO  cannot  be  instantiated  with  an  unconstrained  array 
type,  then  the  following  tests  are  inapplicable: 

AE2101C.DEP  EE2201D.ADA 


If  SEQUENTIAL_IO  cannot  be  instantiated  with  a  record  type  with 
discriminants  with  no  default  values,  then  the  following  tests  are 
inapplicable: 

AE2101C.DEP  EE2201E.ADA 
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Compile  Time  Inapplicability 


If  DIRECT  10  cannot  be  instantiated  vith  an  unconstrained  array  type, 
then  the  lolloving  tests  are  inapplicable: 

AE2101H,DEP  EE2401D.ADA 


If  DIRECT_IO  cannot  be  instantiated  with  a  record  type  with 
discriminants  with  no  default  values,  then  the  following  tests  are 
inapplicable: 

AE2101H.DEP  EE2401G.ADA 


If  there  are  no  strings  which  are  illegal  as  external  file  names,  then 
the  following  tests  are  inapplicable: 

CE2102C.TST  CE2102H.TST 


Tests  Which  Report  "NOT-APPLICABLE" 


This  section  is  concerned  with  tests  that  can  detect,  at  runtime, 
certain  implementation  characteristics  that  make  the  tests  inapplicable. 
The  result  reported  for  these  tests  is  ' NOT_APPLI CABLE ' .  These  tests  must 
compile  and  execute. 


If  USE_ERROR  or  NAHB  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  with  mode  IN^FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  input  and  output;  See  AI -00332),  then  the  following  test 
should  report  NOT  APPLICABLE: 


CE3109A.ADA 


If  CREATE  with  mode  IN_FILE  is  supported  for  text  files, 
following  test  should  report  N0T_APPLI CABLE: 


CE3102E.ADA 


If  OPEN  with  mode  IN  FILE  is  supported  for  text  files,  then 
following  test  shoul?  report  NOT  APPLICABLE: 


CE3102J.ADA 


If  USE_ERR0R  or  NAME_ERR0R  is  raised  by  every  attempt  to  create  or 
open  a  text  file  wiTh  mode  0UT_FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  input  and  output;  see  AI -00332),  then  the  following  tests 
should  report  NOT_APPLICABLE: 


CE2109C.ADA 

CE3107B.ADA 

CE3403A.ADA 

CE3408B.ADA 

CE360SA.ADA 

CE3905B.ADA 

EE3410F.ADA 


CE3102A.ADA 

CE3112C.ADA 

CE3406B.AOA 

CE3409A.ADA 

CE3603E.ADA 

EE3405B.AOA 


CE3102B.TST 

CE3402D.AD/. 

CE3407B.ADA 

CE3410A.ADA 

CE3706F.ADA 

EE3409F.ADA 


If  CREATE  with  Biode  0UT_FILE  is  supported  for  text  files, 
following  test  should  report  NOT^APPLICABLE: 


CE3102I.ADA 


Tests  Vhich  Report  "NOT-APPLICABLE" 


If  OPEN  with  mode  OUT_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE: 

CE3102K.ADA 


If  RESET  is  supported  for  text  files,  then  the  following  test  should 
report  NOT_APPLI CABLE: 

CE3102F.ADA 


If  DELETE  for  text  files  is  supported,  then  the  following  test  should 
report  NOTAPPLICABLE: 

CE3102G.ADA 


If  USE_ERR0R  or  NAME  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  (this  is  the  appropriate  behavior  for  an 
implementation  vhich  does  not  support  text  files  other  than  standard 
input  and  output;  see  AI-00332),  then  the  following  tests  should 
report  NOT_APPLI CABLE: 


CE2108A.ADA 

CE2108D.ADA 

CE310AA.ADA 

CE3108B.ADA 

CE3112B.ADA 

CE3203A.ADA 

CE3301B.ADA 

CE3305A.ADA 

CE3402C.ADA 

CE3403E.ADA 

CE3404B.ADA 

CE3405A.ADA 

CE3405D.ADA 

CE3406D.ADA 

CE3408A.ADA 

CE3409D.AOA 

CE3410C.ADA 

CE3410F.ADA 

CE3411C.A0A 

CE3413C.ADA  . 

CE3602C.ADA''  ' 

CE3604A.ADA 

CE3605C.ADA 

CE3606B.ADA 

CE3704D.ADA 

CE3704M.ADA 

CE3706D.ADA 

CE3804B.ADA 


CE2108B.ADA 

CE3102H.ADA 

CE3104B.ADA 

CE3110A.ADA 

CE3112D.ADA 

CE3208A.ADA 

CE3301C.ADA 

CE3402A.ADA 

CE3403B.ADA 

CE3403F.ADA 

CE3404C.ADA 

CE3405B.ADA 

CE3406A.AOA 

CE3407A.ADA 

CE3408C.ADA 

CE3409E.ADA 

CE3410D.ADA 

CE3411A.ADA 

CE3412A.ADA 

CE3602A.ADA 

CE3602D.ADA 

CE3604B.ADA 

CE3605D.ADA 

CE3704A.ADA 

CE3704E.ADA 

CE3704N.ADA 

CE3706G.ADA 

CE3804C.ADA 


CE2108C.ADA 

CE3103A.ADA 

CE3108A.ADA 

CE3112A.ADA 

CE3114A.ADA 

CE3301A.ADA 

CE3302A.ADA 

CE3402B.ADA 

CE3403C.ADA 

CE3404A.ADA 

CE3404D.ADA 

CE3405C.ADA 

CE3406C.ADA 

CE3407C.ADA 

CE3409C.ADA 

CE3409P.ADA 

CE3410E.ADA 

CE3411B,ADA 

CE3413A.ADA 

CE3602B.ADA 

CE3603A.ADA 

CE3605B.ADA 

CE3606A.ADA 

CE3704B.ADA 

CE3704P.ADA 

CE37040.ADA 

CE3804A.ADA 

CE3804D.ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


CE3804E.ADA  CE3804F.ADA  CE3804G.ADA 
CE3804H.ADA  CE3804I.ADA  CB3804J.ADA 
CE3804K.ADA  CE3804L.ADA  CE3804M.ADA 
CE3804N.ADA  CE38040.ADA  CE3804P.ADA 
CE3805A.ADA  CE3805B.ADA  CE3806A.ADA 
CE3806B.ADA  CE3806D.ADA  CE3806E.ADA 
CB3806G.ADA  CE3806H.ADA  CE3905A.ADA 
CE3905C.ADA  CE3905L.ADA  CE3906A.ADA 
CE3906B.ADA  CE3906C.ADA  CE3906B.ADA 
CE3906P.ADA  EE3203A.ADA  EE3402B.ADA 
EE3412C.ADA 


If  RESET  is  not  supported  for  text  files,  then  the  following  tests 
should  report  NOT_APPLI CABLE; 

CE3104C.ADA  CE3115A.ADA 


If  DELETE  for  text  files  is  not  supported,  then  the  following  tests 
should  report  NOT_APPLICABLE; 

CE3110A.ADA  CE3114A.ADA 


If  association  of  multiple  Internal  text  files  to  a  single  external 
file  is  not  supported,  then  the  following  tests  should  report 
NOT_APPLICABLE; 

CE2110B.ADA  CE3111A.ADA  CE3111B.ADA 
CE3H1C.ADA  CE3111D.ADA  CE3111B.ADA 
CE3114B,ADA  CE3115A.ADA 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  with  mode  IN  FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  3oes  not  support  sequential 
files;  see  AI-00332)'  then  the  following  test  should  report 
NOT_APPLICABLE; 

CE2105A.ADA 


If  CREATE  and  OPEN  with  mode  IN_FILE  are  supported  for  sequential 
files,  then  the  following  tests  should  report  NOT_APPLICABLE: 


CE2102D.ADA 


CE2102N.ADA 


Tests  Which  Report  "NOT-APPLICABLE 


If  RESET  to  mode  IN_FILE  is  supported  for  sequential  files  ,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CE21020.ADA  CE2111F.ADA  CE2H1I.ADA 
CE2204C.ADA 


If  USE  ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  i  sequential  file  with  mode  OUT  FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  ?oes  not  support  sequential 
files;  see  AI-00332),  then  the  following  tests  should  report 
NOT_APPLICABLE: 

CE2102A.ADA  CE2102C.TST  CE2102X.ADA 
CE2106A.ADA  CE2108E.ADA  CE2109A.ADA 
CE2110A.ADA 


If  CREATE  and  OPEN  with  mode  OUT_FILE  are  supported,  then  the 
following  tests  should  report  NOT_APPLI CABLE: 

CE2102E.ADA  CE2102P.ADA 


If  RESET  to  mode  OUT  FILE  is  supported  for  sequential  files,  then  the 
following  test  shoul3  report  NOT_APPLICABLE: 

CE2102Q.ADA 


If  RESET  to  mode  OUT_FILE  is  not  supported  for  sequential  files,  then 
the  following  tests  should  report  NOT_APPLICABLE: 

CE2111C.ADA  CE2111D.ADA  CE2111F.ADA 
CE2111I.ADA 


If  DELETE  for  sequential  files  is  not  supported,  then  the  following 
tests  should  report  NOT  APPLICABLE: 

CE2106A.ADA  CE2110A.ADA 


If  association  of  multiple  internal  sequential  files  to  a  single 
external  file  is  not  supported,  then  the  following  tests  should  report 
NOT_APPLICABL£: 

CE2107A.ADA  CE2107B.ADA  CE2107C.ADA 
CE2107D.ADA  CE2111D.ADA 
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Tests  Which  Report  "NOT-APPLICABLE" 


If  USE  ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  sequential  files;  see  AI-00332), 
then  the  following  tests  should  report  NOT_APPLI CABLE: 


CE2103C.ADA 

CE2104B.ADA 

CE2108P.ADA 

CE2201A.AOA 

CE2201P.A0A 

CE2201I.A0A 

CE2201L.AOA 

CE2204A.AOA 

CE22040.ADA 

CE2210A.A0A 


CE2102G.ADA 

CE2108A.ADA 

CE2111A.ADA 

CE2201B.A0A 

CE2201G.A0A 

CE2201J.AOA 

CE2201H.ADA 

CE2204B.ADA 

CE220SA.ADA 


CE2104A.ADA 

CE2108B.ADA 

CE2115B.AOA 

CB2201C.A0A 

CE2201H.AOA 

CE2201K.AOA 

CE2201N.AOA 

CE2204C.ADA 

CE2208B.AOA 


If  USE_ERROR  or  NAHE_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  IN_FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  direct  access 
files;  see  AI -00332),  then  the  following  tests  should  report 
NOT_APPLICABLE: 

CE2105B.ADA  CE2401B.ADA  CE2401F.ADA 
CB2401H.A0A  CE2401I.AOA  CE2401J.AOA 
CE2405B.ADA  CE2407A.ADA 


If  CREATE  with  mode  IN_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  N0T_APFLICABLE: 

CE2 1021.  ADA 

If  OPEN  with  mode  IN  FILE  is  supported  for  direct  access  files,  then 
the  following  test  sHould  report  N0T_APPLI CABLE ; 

CE2102T.ADA 

If  RESET  with  mode  IN  FILE  is  supported  for  direct  access  files,  then 
the  following  tests  sKould  report  N0T_APPLI CABLE; 

CE2102U.ADA,  .CE2407B.ADA 


If  RESET  with  mode  IN^FILE  is  not  supported  for  direct  access  files, 
then  the  following  tests  should  report  N0T_APPLI CABLE: 


CE2111B.ADA 


CE2111G.ADA 


CE2111H.ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


If  USE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  node  Oirr_FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  direct  access 
files;  see  AI-00332),  then  the  following  tests  should  report 
NOT_APPLICABLE; 

CE2102B.ADA  CE2102Y.AOA  CE2106B.ADA 
CE2110C.ADA  CB2401K.ADA  CE2404A.AOA 
CE2404B.ADA  CE2407A.A0A  CE2407B.ADA 
CE2408A.AOA  CE2409B.ADA  CE2410A.ADA 
CE2410B.ADA 


If  CREATE  and  OPEN  with  mode  OUT^FILE  is  supported  for  direct  access 
files,  then  the  following  tests  should  report  NOT_APPLICABLE: 

CE2102J.A0A  CE2102V.AOA 


If  RESET  with  mode  OUT_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  NOT_APPLI CABLE: 

CE2 102V. ADA 


If  USE_ERR0R  or  NAHE_ERR0R  is  raised  by  every  attempt  to  create  or 
open  ~a  direct  access  file  with  mode  INOUT  FILE  (this  is  the 
appropriate  behavior  for  an  implementation  whicH  does  not  support 
direct  access  files;  see  AI-00332),  then  the  following  tests  should 
report  N0T_APPLI CABLE: 

CE2102H.TST  CE2109B.AOA  CE2401E.AOA 
CE2401F.ADA  CE2401H.AOA  CE2401I.ADA 
CE2401J.A0A  CE2401K.ADA  CE2401L.ADA 
CE2405B.ADA  CE2408B.AOA  CE2409A.ADA 


If  CREATE  and  OPEN  with  mode  INOUT_FILE  are  supported  for  direct 
access  files,  then  the  following  tests  should  report  N0T_APPLI CABLE: 

CE2102F.A0A  CE2102R.ADA 


If  RESET  to  mode  INOUT_FILE  is  supported  for  direct  access  files,  then 
the  following  t^s't-'Should  report  N0T_APPLI CABLE: 


CE2102S.ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


If  DELETE  for  direct  access  files  is  not  supported,  then  the  following 
tests  should  report  NOT_APPLI CABLE: 

CE2106B.ADA  CE2110C.A0A 


If  association  of  multiple  internal  direct  access  files  to  a  single 
external  file  is  not  supported,  then  the  following  tests  should  report 
NOTAPPLICABLE: 

CE2107F.ADA  CE2107G.AOA  CE2107H.ADA 
CE2107I.ADA  CE2110D.A0A  CE2111H.ADA 


If  USE_ERROR  or  NAHE_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  direct  access  files;  see 
AI-00332),  then  the  following  tests  should  report  NOT_APPLICABLE: 

CE2102K.ADA  CE2103D.ADA  CE2104C.ADA 
CE2104D.A0A  CE2108C.ADA  CE2108D.ADA 
CE2108G.ADA  CE2108H.ADA  CE2111E.ADA 
CE2115A.AOA  CE2401A.AOA  CE2401B.A0A 
CE2401C.A0A  CE2406A.ADA  CE2411A.ADA 


If  association  of  an  internal  sequential  file  and  an  internal  direct 
access  file  to  a  single  external  file  is  not  supported,  then  the 
following  tests  should  report  NOT^^APPLICABLE: 

CE2107E.ADA  CE2107L.ADA 


If  the  INLINE  pragma  is  not  supported  for  PROCEDURES,  then  the 
following  tests  should  report  NOT_APPLI CABLE: 

CA3004E*.ADA  EA3004C*.ADA  LA3004A*.ADA 


If  the  INLINE  pragma  is  not  supported  for  FUNCTIONS,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CA3004F*.ADA  EA3004D*.ADA  LA3004B*.ADA 


If  excessive  recursion  causes  STORAGE_ERROR  to  be  raised,  then  the 
following  test  should  report  NOT_AFPLlCABLE: 


D64005F*.ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


APPENDIX  C 


Package  REPORT  Specification  and  Body 


—  REPSPEC.AOA 

—  PURPOSE: 

THIS  REPORT  PACKAGE  PROVIDES  THE  MECHANISM  FOR  REPORTING  THE 
PASS/PAIL/NOT-APPLICABLE  RESULTS  OP  EXECUTABLE  (CLASSES  A,  C, 

D,  E»  AND  L)  TESTS. 

IT  ALSO  PROVIDES  THE  MECHANISM  FOR  GUARANTEEING  THAT  CERTAIN 
VALUES  BECOME  DYNAMIC  (NOT  KNOWN  AT  COMPILE-TIME). 

—  HISTORY: 

JRK  12/13/79 
JRK  06/10/80 
JRK  08/06/81 
JRK  10/27/82 
JRK  06/01/84 

PVB  07/30/87  ADDED  PROCEDURE  SPECIAL  ACTION. 

TBN  08/20/87  ADDED  FUNCTION  LEGAL_PILB_NAME. 

PACKAGE  REPORT  IS 

SUBTYPE  FILE_NUM  IS  INTEGER  RANGE  1..3; 

—  THE  REPORT  ROUTINES. 

PROCEDURE  TEST  '  —  THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 

—  START  OF  A  TEST,  BEFORE  ANY  OF  THE 
—  OTHER  REPORT  ROUTINES  ARB  INVOKED. 

—  IT  SAVES  THE  TEST  NAME  AND  OUTPUTS  THE 
—  NAME  AND  DESCRIPTION. 

(  NAME  :  STRING;  —  TEST  NAME,  E.G.,  "C23001A-AB". 

DESCR  :  STRING  —  BRIEF  DESCRIPTION  OF  TEST,  E.G., 

—  "UPPER/LOWER  CASE  EQUIVALENCE  IN  "  6 


REPORT  Package  Specification 


—  "IDENTIFIERS". 

); 

PROCEDURE  FAILED  —  OUTPUT  A  FAILURE  MESSAGE.  SHOULD  BE 

—  INVOKED  SEPARATELY  TO  REPORT  THE 
—  FAILURE  OF  EACH  SUBTEST  WITHIN  A  TEST. 
(  DESCR  :  STRING  ~  BRIEF  DESCRIPTION  OP  WHAT  FAILED. 

—  SHOULD  BE  PHRASED  AS: 

—  "(FAILED  BECAUSE)  ...REASON...". 

); 

PROCEDURE  NOTAPPLICABLE  —  OUTPUT  A  NOT-APPLICABLE  MESSAGE. 

—  SHOULD  BE  INVOKED  SEPARATELY  TO  REPORT 
—  THE  NON-APPLICABILITY  OP  EACH  SUBTEST 
—  WITHIN  A  TEST. 

(  DESCR  :  STRING  —  BRIEF  DESCRIPTION  OP  WHAT  IS 

~  NOT-APPLICABLE.  SHOULD  BE  PHRASED  AS: 

—  "(NOT-APPLICABLE  BECAUSE) .. .REASON. 

); 


PROCEDURE  SPECIAL_ACTION  —  OUTPUT  A  MESSAGE  DESCRIBING  SPECIAL 

—  ACTIONS  TO  BE  TAKEN. 

—  SHOULD  BE  INVOKED  SEPARATELY  TO  GIVE 
—  EACH  SPECIAL  ACTION. 

(  DESCR  :  STRING  —  BRIEF  DESCRIPTION  OF  ACTION  TO  BE 

—  TAKEN. 


)5 


PROCEDURE  COMMENT  —  OUTPUT  A  COMMENT  MESSAGE. 

(  DESCR  :  STRING  —  THE  MESSAGE. 

)5 

PROCEDURE  RESULT;  —  THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 

—  END  OP  A  TEST.  IT  OUTPUTS  A  MESSAGE 
—  INDICATING  WHETHER  THE  TEST  AS  A 
—  WHOLE  HAS  PASSED,  FAILED,  IS 
—  NOT-APPLICABLE,  OR  HAS  TENTATIVELY 
—  PASSED  PENDING  SPECIAL  ACTIONS. 

—  THE  DYNAMIC  VALUE  ROUTINES. 

—  EVEN  WITH  STATIC  ARGUMENTS,  THESE  FUNCTIONS  WILL  HAVE  DYNAMIC 

—  RESULTS. 

FUNCTION  IDENT  ll^  '  —  AN  IDENTITY  FUNCTION  FOR  TYPE  INTEGER. 

(  X  :  INTEGlR  —  THE  ARGUMENT. 

)  RETURN  INTEGER;  —  X. 

FUNCTION  IDENT_CHAR  —  AN  IDENTITY  FUNCTION  FOR  TYPE 

—  CHARACTER. 

(  X  :  CHARACTER  —  THE  ARGUMENT. 

)  RETURN  CHARACTER;  —  X. 


REPORT  Package  Specification 


FUNCTION  IDENT  BOOL  —  AN  IDENTITY  FUNCTION  FOR  TYPE  BOOLEAN. 

(  X  :  BOOLEAN  —  THE  ARGUMENT. 

)  RETURN  BOOLEAN;  —  X. 

FUNCTION  IDENT  STR  —  AN  IDENTITY  FUNCTION  FOR  TYPE  STRING. 

(  X  :  STRING  —  THE  ARGUMENT. 

)  RETURN  STRING;  —  X. 

FUNCTION  EQUAL  —  A  RECURSIVE  EQUALITY  FUNCTION  FOR  TYPE 

—  INTEGER. 

(  X,  Y  ;  INTEGER  —  THE  ARGUMENTS. 

)  RETURN  BOOLEAN;  —  X  -  Y. 

—  OTHER  UTILITY  ROUTINES. 

FUNCTION  LEGAL_FILE_NAME  —  A  FUNCTION  TO  GENERATE  LEGAL  EXTERNAL 

—  FILE  NAMES. 

(  X  :  FILE  NUM  1;  —  DETERMINES  FIRST  CHARACTER  OF  NAME. 

NAM  :  STRING  —  DETERMINES  REST  OF  NAME. 

)  RETURN  STRING;  —  THE  GENERATED  NAME. 

END  REPORT; 
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REPORT  Package  Body 


—  REPBODY.ADA 

—  HISTORY; 

DCB  0<«  '27/80 
JRK  6/10/80 
JRK  11/12/80 
JRK  8/6/81 
JRK  10/27/82 
JRK  6/1/84 

JRK  11/18/85  ADDED  PRAGMA  ELABORATE. 

PWB  07/29/87  ADDED  STATUS  ACTION_REQUIRED  AND 
PROCEDURE  SPECIAL_ACTION. 

TBN  08/20/87  ADDED  FUNCTION  LEGALPILENAME . 

WITH  TEXT_IO; 

USE  TE3n:_I0; 

PRAGMA  ELABORATE  (TEXTIO); 

PACKAGE  BODY  REPORT  IS 

TYPE  STATUS  IS  (PASS,  FAIL,  DOES_NOT_APPLY,  ACTION_REQUIRED) ; 
TEST_STATUS  :  STATUS  FAIL; 

MAX  NAME  LEN  :  CONSTANT  15;  —  MAXIMUM  TEST  NAME  LENGTH. 

TEST_NAME  :  STRING  (1. .MAX_NAME_LEN) ; 

NO_NAME  ;  CONSTANT  STRING  (1..7)  ;«  "NO  NAME"; 

TEST_NAME_LEN  :  INTEGER  RANGE  0 . . MAX_NAME_LEN  0; 

PROCEDURE  PUT_MSG  (MSG  ;  STRING)  IS 

—  WRITE  MESSAGE.  LONG  MESSAGES  ARE  FOLDED  (AND  INDENTED). 
MAX  LEN  !  CONSTANT  INTEGER  RANGE  50.. 150  72;  —  MAXIMUM 

—  OUTPUT  LINE  LENGTH. 

INDENT  :  CONSTANT  INTEGER  TEST_NAME  LEN  +  9;  —  AMOUNT  TO 

~  indent  continuation  LINES. 

I  :  INTEGER  0;  —  CURRENT  INDENTATION. 

M  !  INTEGER  MSG' FIRST;  —  START  OF  MESSAGE  SLICE. 

N  :  INTEGER;  —  END  OF  MESSAGE  SLICE. 

BEGIN 

LOOP 

IP  I  +  (MSG'LAST-M+1)  >  MAXLEN  THEN 
N  M  +  (MAX_LEN-I)  -  1; 

IF  MSG  (N)  /-  '  '  THEN 

WHILE  N  >-  M  AND  THEN  MSG  (N+1)  /-  '  '  LOOP 
N  N  -  1; 

END  LOOP; 

IP  N  <  M  THEN 

N  M  +  (MAX_LEN-I)  -  1; 

END  IF; 

END  IF; 

ELSE  N  MSG' LAST; 

END  IF; 
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SET_COL  ;STANDARD_OUTPUT,  COUNT  (I+l)); 

PUT_LINE  (STANDARDOUTPUT,  MSG  (M..N)); 

I  INDENT; 

H  N  1; 

WHILE  M  <-  MSG' LAST  AND  THEN  MSG  (M)  -  '  '  LOOP 
M  M  1; 

END  LOOP; 

EXIT  WHEN  M  >  MSG 'LAST; 

END  LOOP; 

END  PUT_MSG; 

PROCEDURE  TEST  (NAME  ;  STRING;  DESCR  :  STRING)  IS 
BEGIN 

TEST_STATUS  PASS; 

IF  NAME' LENGTH  <-  MAX_NAME_LEN  THEN 
TEST_NAME_LEN  NAME 'LENGTH; 

ELSE  TEST_NAME_LEN  MAX_NAME  LEN; 

END  IP; 

TEST_NAME  (1..TEST  NAME_LEN) 

NAME  (NAME' FIRST  ..  NAME' FIRST+TEST  NAME  LEN-1); 
PUTMSG  (""); 

PUT_MSG  (" -  "  &  TESTNAME  ( 1 . . TEST_NAME  LEN)  i  "  "  i 

DESCR  &"."); 

END  TEST; 

PROCEDURE  COMMENT  (DESCR  :  STRING)  IS 
BEGIN 

PUT  MSG  ("  -  "  &  TEST_NAMB  (1..TEST  NAME  LEN)  &  "  "  & 

DESCR  4 

END  COMMENT; 

PROCEDURE  FAILED  (DESCR  :  STRING)  IS 
BEGIN 

TEST_STATUS  :«  FAIL; 

PUT_MSG  ("  *  "  i  TEST_NAME  ( 1 . . TEST_NAME  LEN)  &  "  "  & 

DESCR  4  "."); 

END  FAILED; 

PROCEDURE  NOTAPPLICABLE  (DESCR  :  STRING)  IS 
BEGIN 

IP  TEST  STATUS  -  PASS  OR  TEST_STATUS  -  ACTIONREQUIRED  THEN 
TEST_STATUS  DOESNOT  APPLY; 

END  IP; 

PUT_MSG  ("  +  "  4  TESTNAME  (1..TEST  NAME  LEN)  4  "  "  4 

DES®-4  "."); 

END  NOT_APPLICABLE; 

PROCEDURE  SPECIAL_ACTION  (DESCR  ;  STRING)  IS 
BEGIN 

IP  TEST_STATUS  =■  PASS  THEN 

TEST_STATUS  ACTIONREQUIRED; 

END  IP; 
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PUTMSG  ("  !  "  &  TEST_NAMB  (1. .TEST_NAME_LEN)  &  "  "  & 

DESCR  & 

END  SPECIAL_ACTION; 

PROCEDURE  RESULT  IS 
BEGIN 

CASE  TESTSTATUS  IS 
WHEN  PASS  -> 

PUT_MSG  -  "  &  TEST_NAMB  (1.  .TEST  NAME  LEN)  & 

”  PASSED 
VHEN  DOES  NOT  APPLY  .> 

PUTMSG  !"++++  "  &  TEST  NAME  (1. .TESTNAMELEN)  & 

"  NOT-APPLICABEE  ++++++++++++++++++++."); 

VHEN  ACTION  REQUIRED  .> 

PUTMSG  ("!!!!  "  &  TBST_NAME  (1..TEST  NAME  LEN)  & 

"  TENTATIVELY  PASSED  f 1 1  fit iTl HlTf  f  f . ; 
PUT_MSG  ("!!!!  "  &  (1 . .TEST_NAME_LEN  .>  '  ')  & 

"  SEE  '!'  COMMENTS  FOR  SPECIAL  NOTESIl"); 

VHEN  OTHERS  .> 

PUT_MSG  ("****  "  &  TEST_NAME  (1. .TEST_NAMB_LBN)  & 

"  FAILED  ****************************.")• 

END  CASE; 

TEST_STATUS  :.  FAIL; 

TEST_NAME_LEN  :.  NO_NAME- LENGTH ; 

TESTNAME  (1..TEST  NAME_LEN)  :.  NO  NAME; 

END  RESULT; 

FUNCTION  IDENT_INT  (X  :  INTEGER) 

BEGIN 

IF  EQUAL  (X,  X)  THEN 
RETURN  X; 

END  IF; 

RETURN  0; 

END  IDENT_INT; 

FUNCTION  IDENTCHAR  (X  :  CHARACTER)  RETURN  CHARACTER  IS 
BEGIN 

IF  EQUAL  (CHARACTER' POS(X),  CHARACTER' POS(X) )  THEN  —  ALVAYS 

—  EQUAL. 

RETURN  X;  —  ALVAYS  EXECUTED. 

END  IP; 

RETURN  'O';  —  NEVER  EXECUTED. 

END  IDENT_CHAR; 

FUNCTION  IDENT_iei0OL  (X  :  BOOLEAN)  RETURN  BOOLEAN  IS 
BEGIN 

IP  EQUAL  (BOOLEAN' POS(X),  BOOLEAN' POS(X) )  THEN  —  ALVAYS 

—  EQUAL. 

RETURN  X;  —  ALVAYS  EXECUTED. 

END  IF; 

RETURN  FALSE;  —  NEVER  EXECUTED. 

END  IDENT  BOOL; 


RETURN  INTEGER  IS 

—  ALVAYS  EQUAL. 

—  ALVAYS  EXECUTED. 

—  NEVER  EXECUTED. 
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FUNCTION  IDENT_STR  (X  ;  STRING)  RETURN  STRING  IS 
BEGIN 

IF  EQUAL  (X' LENGTH,  X' LENGTH)  THEN  —  ALWAYS  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  —  NEVER  EXECUTED. 

END  IDENT  STR; 


FUNCTION  EQUAL  (X,  Y  :  INTEGER)  RETURN  BQOLEAN  IS 

REC_LIMIT  :  CONSTANT  INTEGER  RANGE  1..100  3;  —  RECURSION 

—  LIMIT. 

Z  :  BOOLEAN;  —  RESULT. 

BEGIN 

IF  X  <  0  THEN 

IF  Y  <  0  THEN 

Z  EQUAL  (-X,  -Y); 

ELSE  Z  FALSE; 

END  IF; 

ELSIF  X  >  REC  LIMIT  THEN 

Z  :=  EQUAL  (REC_LIHIT,  Y-X+REC_LIM1T) ; 

ELSIF  X  >  0  THEN 

Z  EQUAL  (X-1,  Y-1); 

ELSE  Z  :m  Y  =  0; 

END  IF; 

RETURN  2; 

EXCEPTION 

WHEN  OTHERS  => 

RETURN  X  *  Y; 

END  EQUAL; 

FUNCTION  LEGAL_FILE  NAME  (X  :  FILE  NUM  1; 

NAM  :  STRING  '"’) 

RETURN  STRING  IS 
SUFFIX  :  STRING  (2..6); 

BEGIN 

IF  NAM  .  ""  THEN 

SUFFIX  TEST  NAME (3.. 7); 

ELSE 

SUFFIX  ;»  NAM(3..7); 

END  IF; 

CASE  X  IS 

WHEN  1  ->  RETURN  ('X'  &  SUFFIX); 

WHEN  2  ->  RETURN  ('Y'  &  SUFFIX); 

WHEN  3.->  RETURN  ('Z'  &  SUFFIX); 

END  CASE; 

END  LEGAL  FILE  NAME; 


BEGIN 


TEST_NAME_LEN  NO_NAME ' LENGTH ; 

TEST  NAME  (1..TEST  NAME  LEN)  NO  NAME; 
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—  CHECK_FILE.ADA 

—  THIS  IS  A  PROCEDURE  USED  BY  HANY  OP  THE  CHAPTER  14  TESTS  TO  CHECK  THE 

—  CONTENTS  OF  A  TEXT  PILE. 

—  THIS  PROCEDURE  ASSUMES  THE  FILE  PARAMETER  PASSED  TO  IT  IS  AN  OPEN 

—  TEXT  FILE. 

—  THE  STRING  PARAMETER  CONTAINS  THE  CHARACTERS  THAT  ARE  SUPPOSED  TO  BE 

—  IN  THE  TEXT  PILE.  A  CHARACTER  IS  USED  IN  THE  STRING  TO  DENOTE 

—  THE  END  OF  A  LINE.  A  '9'  CHARACTER  IS  USED  TO  DENOTE  THE  END  OF  A 

—  PAGE.  A  CHARACTER  IS  USED  TO  DENOTE  THE  END  OF  THE  TEXT  PILE. 
THESE  SYMBOLS  SHOULD  NOT  BE  USED  AS  TEXT  OUTPUT. 

—  SPS  11/30/82 

—  JBG  2/3/83 

WITH  REPORT}  USE  REPORT; 

WITS  TEXT_IO;  USB  TEXTIO; 

PROCEDURE  CHECK_PILE  (PILE:  IN  OUT  PILE_TYPB;  CONTENTS  :  STRING)  IS 
X  :  CHARACTER; 

COL  COUOT  :  POSITIVE  COUNT  1; 

LINf_COUNr  :  POSITIVf  COUNT  1; 

PAGE  COUNT  i  POSIfiVE  COUNT  1; 

trailing  BLANKS  MSG  ^TTEN  :  BOOLEAN  FALSE; 

STOP_PROCESSING  :  EXCEPTION; 

PROCEDURE  CHECKEND  OF_LINB  (EXPECT_END_OF_PAGE  :  BOOLEAN)  IS 
BEGIN 

—  SKIP  OVER  ANT  TRAILING  BLANKS.  AN  IMPLEMENTATION  CAN  LEGALLY 
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—  APPEND  BLANKS  TO  THE  END  OP  ANY  LINE. 

WHILE  NOT  END_OF  LINE  (FILE)  LOOP 
GET  (FILE,  3S); 

IP  X  /-  '  '  THEN 

FAILED  ("FROM  CHECK_PILE:  END  OP  LINE  EXPECTED  -  "  & 
X  i  "  ENCOUNTERED"); 

RAISE  STOPPROCESSING; 

ELSE 

IF  NOT  TRAILING_BLANKS  MSG_WRITTEN  THEN 
COMMENT  ("FROM  CHICK  FILE:  "  & 

"THIS  IMPLEMENTATION  PADS  "  & 

"LINES  WITH  BLANKS"); 
TRAILING_BLANKS_MSG_WRITTEN  TRUE; 

END  IF; 

END  IF; 

END  LOOP; 

IP  LINE  COUNT  /-  LINE  (FILE)  THEN 
FAILED  ("FROM  CHECKFILE:  "  & 

"LINE  COUNT  INCORRECT  -  EXPECTED  "  & 
POSITIVE_COUNT'IMAGE(LINE_COUNT)  & 

"  GOT  FROM  FILE  "  & 

POSITIVE  COUNT'IMAGE(LINE(FILE))); 

END  IP; 

—  NOTE:  DO  NOT  SKIP  LINE  WHEN  AT  END  OP  PAGE  BECAUSE  SKIP  LINE  WILL 

ALSO  SKIP  TiE  PAGE  TERMINATOR.  SEE  RM  14.3.5  PARAGRAPH  1. 

IP  NOT  EXPECT  END  OP  PAGE  THEN 
IP  END  OF  PAGE  TFILE)  THEN 

FAILED  ("PROM  CHECK_FILE:  PREMATURE  END  OP  PAGE"); 
RAISE  STOPPROCESSING; 

ELSE 

SKIP_LINE  (FILE); 

LINE_COUNT  LINE  COUNT  +  1; 

END  IF; 

END  IF; 

COL  COUNT  :-  1; 

END  CHECK_END_0F_LINE; 

PROCEDURE  CHECKEND  OF  PAGE  IS 
BEGIN 

IP  NOT  END  OF  PAGE  (FILE)  TH^ 

FAILE5I/^?FR0N  check  pile:  "  & 

"END  OF  PAGE  NOT  WHERE  EXPECTED"); 
raise  STOPPROCESSING; 

ELSE 

IF  PAGE  COUNT  /-  PAGE  (FILE)  THEN 
FAILED  ("PROM  CHECKFILE:  "  & 

"PAGE  COUNT  INCORRECT  -  EXPECTED  "  & 
POSITIVE_COUNT' IMAGE  (PAGE  COUNT)  & 
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END  IF; 


"  GOT  FROM  FILE  "  & 

POSITIVE  COUNT' IMAGE  (PAGE(FILE))); 


SKIPPAGE  (FILE); 

PAGE_COUNT  PAGECOUNT  +  1; 
LINB_COUNT  1; 

END  IF; 

END  CHECK  END  OP  PAGE; 


BEGIN 


RESET  (FILE,  IN_FILE); 

SETLINE  LENGTH  (STANDARD_OUTPUT,  0); 
SET  PAGE'LENGTH  (STANDARD  OUTPUT,  0); 


FOR  I  IN  1 
BEGIN 


CONTENTS' LENGTH  LOOP 


CASE  CONTENTS  (I)  IS 
WHEN  '#'  -> 

CHECK  END_OP_LINE  (CONTENTS  (I  +  1)  -  '@'); 
WHEN  '@'  -> 

CHECK  ENDOF  PAGE; 

WHEN  'X'  -> 

IP  NOT  END  OP  FILE  (FILE)  THEN 

failed  (’^FROM  check  PILE:  "  & 

"END  OP  FILl  NOT  WHERE  EXPECTED"); 
RAISE  STOP  PROCESSING; 

END  IP; 

WHEN  OTHERS  -> 

IP  COL_COUNT  /-  COL(PILE)  THEN 

FAILED  ("FROM  CHECK_PILE:  "  & 

"COL  COUNT  INCORRECT  -  "  i 
"EXPECTED  "  &  POSITIVE  COUNT' 
IMAGE(COL  COUNT)  &  "  GOT  FROM  "  & 
"PILE  "  OOSITIVE  COUNT' IMAGE 
(COL(FILE))); 

END  IF; 

GET  (PILE,  X); 

COL  COUNT  COL_COUNT  +  1; 

IF  X  /-  CONTENTS  (I)  THEN 

FAILED("FROM  CHECK  PILE;  "  & 

"PILE  DOES  NOT  CONTAIN  CORRECT  "  & 
"OUTPUT  -  EXPECTED  "  &  CONTENTS(I) 

-  GOT  "  &  X); 

RAISE  STOP  PROCESSING; 

END  IP; 

END  CASE; 

EXCEPTION 

WHEN  STOP  PROCESSING  -> 

COMMENT  ("FROM  CHECK_FILE;  "  i 
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"LAST  CHARACTER  IN  FOLLOWING  STRING  "  & 
"REVEALED  ERROR:  "  &  CONTENTS  (1  ..  I)); 

EXIT; 

END; 

END  LOOP; 

EXCEPTION 

WHEN  STATUSERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"STATUS_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  MODE  ERROR  -> 

FAILED  ("FROM  CHECK_FILE:  "  & 

"MODE  ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  NAMEERROR  =>“ 

FAILED  ("FROM  CHECKFILE:  "  & 

"NAME_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  USE  ERROR  => 

FAILED  ("FROM  CHECK_FILE:  "  & 

"USEERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DEVICE_ERROR  -> 

FAILED  ("FROM  CHECKFILE:  "  & 

"DEVICE_ERROR  RAISED  -  FILE  CHECKJNG  INCOMPLETE"); 

WHEN  END  ERROR  -> 

FAILED  ("FROM  CHECK_FILE:  "  & 

"END  ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DATA  ERROR 

FAILED  ("FROM  CHECK  FILE:  "  & 

"DATA  ERROR“RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  LAYOUT_ERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"LAYOUT_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  OTHERS  >> 

FAILED  ("FROM  CHECK_FILE:  "  & 

"SOME  EXCEPTION  RAISED  -  FILE  CHECKING  INCOMPLETE") 

END  CHECK  PILE; 
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Test  CZIIOIA.ADA  should  produce  the  following  on  STANDARD_OUTPUT: 


-  NO  NAME  CZIIOIA-AB!  CHECK  REPORT  ROUTINES.  CHECKING  'COMMENT'. 

-  NO  NAME  CHECKING  'PUT  MSG'  FOR  PROPER  OUTPUT. 

-  NO  NAME  THIS  LINE  IS  EXACTLY  'MAX  LEN'  LONG . 5. . . 60. . . .5. . . 70. . 

-  NO“NAME  THIS  COMMENT  HAS  A  WORD  TEAT  SPANS  THE  FOLD  POINT.  THIS 

COMMENT  FITS  EXACTLY  ON  TWO  LINES.  ...5... 60 _ 5... 70.. 

-  NO  NAME  THIS  COMMENT  HAS  A  WORD  THAT  ENDS  AT  THE  FOLD  POINT  ...70.. 

THE  SPACES  JUST  AFTER  THE  FOLD  POINT  SHOULD  BE  GONE. 

-  NO  NAME  THIS  COMMENT  HAS  A  WORD  THAT  BEGINS  AT  THE  FOLD  POINT. 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NO  NAME  THIS  COMMENT  HAS  SPACES  SPANNING  THE  FOLD  POINT.  ..5... 70 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NO  NAME 

THISCOMMENT  IS  ONE_VERY_LONG_WORD_AND_SO_IT_SHOULD  BE_S 
PLIT_AT  THE_P0L6_P0INT. 

-  NO  NAME  CHECKING  TSAT  REPORT  BODY  INITIALIZES  TO  'NONAME'  AND 

'FAILED'.  CHECKING  'RESULT'. 

****  NO  NAME  FAILED  ****************★***. 

-  PASS_TEST  checking  'TEST'  AND  'RESULT'  FOR  'PASSED'. 

-  PASS_TEST  CHECKING  THAT  INDENTATION  OF  CONTINUATION  LINES  IS 

adjusted  according  TO  TEST  NAME  LENGTH. 

....  pass_test  passed 

-  NO  NAME  CHECKING  'RESULT'  FOR  RESETTING  TO  'NO_NAME'  AND  'FAILED'. 

****  no'name  failed  ********************, 

-  N0"NAME  checking  that  indentation  of  continuation  lines  is  ADJUSTED 

according  to  test  name  length. 

-  FAIL_TEST  checking  'FAILED'  AND  'RESULT'  FOR  'FAILED'. 

*  FAIL_TEST  CHECKING  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

****  FAIL  TEST  FAILED  ********************. 

-  NA  TEST  CHECKING  'NOT  APPLICABLE'  WID  'RESULT'  FOR 

'NOT-APPLICABLE' . 

+  NA  TEST  CHECKING  'NOT  APPLICABLE'.  NOW  'RESULT'  SHOULD  BE 
'NOT-APPLICABLE'. 

++++  NATEST  NOT-APPLICABLE  +++++♦♦+++++++++++++. 

-  pail  NA  TEST  CHECKING  'FAILED',  ' NOTAPPLICABLB ' ,  AND  'RESULT'  FOR 

'FAILED'. 

+  FAIL_NA  TEST  CHECKING  'NOT  APPLICABLE'.  NOW  'RESULT'  SHOULD  BE 
"'NOT-APPLICABLE' . 

*  PAIL  NA  TEST  CHECKING  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

+  FAIL'NA  test  CHECKING  'NOT  APPLICABLE'.  NOW  'RESULT'  SHOULD  STAY 

'FAILED'. 

****  pail  NATEST  FAILED  ********************. 

-  NO  NAME~END  CZIIOIA. 


Sample  Output  Of  Acceptance  Tests 
Test  CZ1103A.AOA  should  produce  the  follovlng  on  STANDARO_OUTPUT: 


-  CZ1103A  CHECK  THAT  PROCEDURE  CHECK  FILE  WORKS. 

-  CZ1103A  BEGIN  TEST  WITH  AN  EMPTY  PTLE. 

-  CZ1103A  BEGIN  TEST  WITH  A  PILE  WITH  BLANK  LINES. 

-  CZ1103A  BEGIN  TEST  WITH  A  PILE  WITH  BLANK  LINES  AND  PAGES. 

-  CZ1103A  BEGIN  TEST  WITH  A  PILE  WITH  TRAILING  BLANKS. 

-  CZ1103A  FROM  CHECKPILE:  THIS  IMPLEMENTATION  PADS  LINES  WITH 

BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  PILE  WITHOUT  TRAILING  BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  PILE  WITH  AN  END  OP  LINE  ERROR. 

*  CZ1103A  PROM  CHECKPILE:  END  OP  LINE  EXPECTED  -  E  ENCOUNTERED. 

-  CZ1103A  FROM  CHECK  PILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALE5  ERROR:  THIS  LINE  WILL  CONTAIN  AN  t. 

-  CZ1103A  BEGIN  TEST  WITH  PILE  WITH  END  OF  PAGE  ERROR. 

*  CZ1103A  PROM  CHECK  PILE:  END  OP  PAGE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK“PILE:  LAST  cBaRACTER  IN  FOLLOWING  STRING 

revealed  ERROR:  THIS  LINE  WILL  CONTAIN  AN  §. 

-  CZ1103A  BEGIN  TEST  WITH  PILE  WITH  END  OF  FILE  ERROR. 

*  CZ1103A  FROM  CHECK  FILE:  END  OP  PILE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK"PILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

revealed  ERROR:  THIS  LINE  WILL  CONTAIN  AN  X. 

-  CZ1103A  BEGIN  TEST  WITH  FILE  WITH  INCORRECT  DATA. 

*  CZ1103A  FROM  CHECK  FILE:  PILE  DOES  NOT  CONTAIN  CORRECT  OUTPUT  - 

expected  c  -  got  I. 

-  CZ1103A  FROM  CHECK  PILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

revealed  ERROR:  LINE  WITH  C. 

****  CZ1103A  FAILED  ********************. 
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